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PREFAZIONE 
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avvale di molte figure, tabelle ed 
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comandi che vengono usati insieme 
o hanno una funzione simile vengo¬ 
no illustrati nello stesso capito¬ 
lo. Le appendici C,D ed F pre¬ 
sentano le istruzioni, i comandi e 
le funzioni in ordine alfabetico 
con relativo numero di pagina, per 
permettere una rapida consultazio¬ 
ne. 

Non è indispensabile una preceden¬ 
te esperienza di programmazione, 
ma è richiesta una conoscenza di 
base di elaborazione dati. 

Si consiglia l'utente di leggere 
la Parte I del PROFESSIONAL 
COMPUTER OPERATING SYSTEM (PCOS) 
GUIOA UTENTE prima di questo 
manuale. 
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SOMMARIO 


Questo capitolo illustra le principali caratteristiche del linguaggio 
BASIC del Modello 20 (M20). 

Dopo un breve cenno ai due ambienti operativi presenti su questo sistema, 
il PCOS ( Professional Computer Operating System) e il BASIC, si spiega 
come usare la tastiera, come eseguire calcoli immediati, come impostare 
ed eseguire un programma BASIC e quali sono le modalità operative in 
BASIC. 
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COSA E' IL BASIC? 


« 

I 

| 

s 

i 


IL LINGUAGGIO BASIC 

IL BASIC (Beginner's All-purpose Symbolic Instruction Code) è un 
linguaggio di alto livello e di uso generale (generai purpose). 

POSSIAMO USARE IL BASIC PER RISOLVERE SIA PROBLEMI COMMERCIALI C HE 
SCIENTIFICI. 

IL BASIC E 1 UN INSIEME DI ISTRUZIONI E COMANDI DI IMMEDIATA INTERPRETA ¬ 
ZIONE. RISULTA QUINDI FACILE IMPARARLO E USARLO. 

Diverse versioni del linguaggio BASIC sono disponibili su diversi 
sistemi. La prima versione del BASIC fu sviluppata al Dartmouth Collega 
da John G. Kemeny e Thomas E. Kurts. D'ora in poi, parlando di BASIC, 
faremo riferimento alla versione implementata sul Modello 20 (M20). 


AMBIENTI PCOS E BASIC 


11 sistema M20 può essere semplicemente definito come un computer e un 
insieme di programmi forniti dalla Olivetti e residenti su un "minifloppy 
disk" (disco sistema). 

Questi vengono detti "Programmi di Sistema". Questi Programmi di Sistema, 
che comprendono il PCOS e il BASIC, permettono di dare istruzioni al 
computer in un linguaggio simile alla lingua inglese. Essi convertono le 
istruzioni fornite dall'utente in un linguaggio macchina che può così 
essere interpretato dal computer. L'utente interagisce con il computer 
usando comandi PCOS e BASIC e insiemi di istruzioni che formano un 
programma BASIC. 

Nota : D'ora in avanti, per brevità, useremo il termine disco invece di 
mini-floppy disk. 
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PROGRAMMI DI SISTEMA' 




i- 




Inizializzazione di un disco 



PC OS 


BASIC 



Introduzione di un programma 

Denominazione di un disco 

Lista di un programma 

Copia di un disco 

Memorizzazione su disco 
di un programma 

Lista della directory 



Esecuzione di un programma 

Assegnazione di una password 


Debugging di un programma 

Creazione di un file 


Modifica di un programma 

Protezione di un file da scrittura 

m 

■ 

m 



Calcoli immediati 

Disegno di figure 




■ 

■ 

m 


Figura 1-1 Programmi di Sistema 


USO DELLA TASTIERA 


La tastiera permette di impostare qualsiasi tipo di testo e di introdurre 
i caratteri di controllo. 
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Nota : Tutti i caratteri indicati in questo manuale si riferiscono alla 
versione ASCII della tastiera. L'Appendice B elenca le varie equivalenze 
nazionali per quei caratteri ASCII, che appaiono su video o su stampante. 

Quando, in questo manuale, si vuole mettere in evidenza quali sono i 
tasti che l'utente deve premere per realizzare una certa funzione, verrà 
riportata l’esatta sequenza dei tasti in negativo (caratteri bianchi su 
fondo nero). In detta sequenza possono figurare anche i tasti indicati in 
negativo nella figura 1-2. Ad esempio: 


CR 


Nota : Per convenzione, useremo il simbolo 13 
dei tre tasti di ritorno a capo/interlinea ( feMl 
simbolo jjd&WaM per indicare la barra spaziatrice e 


per indicare uno qualsiasi 


52 


5H1FT 


) e il 
per indicare 


uno dei due tasti Shift. 


Volendo ricordare all'utente di 
sistema, aggiungeremo il simbolo 
Per esempio: 


premere m per inviare 
HM al termine della li 


una linea al 
nea medesima. 


DELETE 100 - 200 


CR 


COME INTRODURRE I CARATTERI 


SE 1'utente... 


ALLORA... 

preme un tasto (o 
una combinazione 
di tasti) 


il carattere che rappresenta viene subito 
visualizzato su video. Di volta in volta che 
l'utente imposta dei caratteri, il cursore 
(H) lampeggia e indica la posizione che verrà 
occupata dal carattere successivo 

vuole introdurre un 
carattere minuscolo 
o il simbolo infe¬ 
riore (dei tasti 
con due simboli) 


deve semplicemente premere quel tasto, per 
esempio Q per a 


1-3 






vuole introdurre 
un carattere maiu¬ 
scolo o il simbo¬ 
lo superiore (dei 
tasti con due 
simboli) 


vuole introdurre 
un numero 


tiene premuto un 
tasto per un tempo 
superiore al tempo 
medio di una battu¬ 
ta (mezzo secondo) 


vuole trasmettere 
una linea al siste¬ 
ma (una linea BASIC, 
un comando PCOS, o 
più dati in risposta 
a una istruzione 
INPUT o LINE INPUT) 


vuole spostare il 
cursore alla linea 
successiva (prima 
di raggiungere il 
margine del video) 


FshifT 

SSéI 

LUHMANDB 



Controllo) 


(vedere Caratteri di 


può usare la sezione numerica o la prima riga 
di tasti della sezione alfanumerica 

il carattere corrispondente viene introdotto 
più volte finché il tasto non viene rilasciato 


deve chiudere il messaggio premendo che 
posiziona il cursore all'inizio della linea 
successiva 


deve premere ripetutamente (o mantenere premu¬ 
to) tefrw 


CARATTERI DI CONTROLLO 

■ , Ca r terÌ ^ con Trollo vengono impostati premendo contemporaneamente 
oppure e un altro tasto. La seguente tabella riporta 

tutti i caratteri di controllo dell'MZO con relativi significati. 


SE l'utente imposta, 



ALLORA... 


interrompe l'esecuzione di un programma. L'M2Q 
ritorna al BASIC (Stato Comandi) e visualizza 
OK (se in ambiente BASIC) o ritorna al PCOS 
(Stato Comandi) e visualizza > (se in ambiente 
PCOS) 
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(Tasto di ritorno) 


(Reset logico) 



(Escape) 



il cursore cambia forma e lampeggia e nessun 
carattere impostato in tastiera appare su video 
(Hide State) 


PER RITORNARE A VISUALIZZARE I CARATTERI 


L'UTENTE DEVE PREMERE NUOVAMENTE 


OPPURE 


CTRL 


l'ultimo carattere introdotto viene cancellato 
e il cursore viene arretrato di una posizione 


la memoria viene azzerata, il PCOS e il BASIC 
vengono di nuovo caricati in memoria da disco 


viene sospeso l'output su video. 

L'OUTPUT PUÒ' ESSERE RIPRESO IMPOSTANDO UN 


TASTO QUALSIASI 


si esce dallo Stato di Inserimento Caratteri, 
pur rimanendo nello Stato di Editor (vedere 
Capitolo 3) 


abilita il fissa maiuscole per lettere (A-Z). 
PER DISABILITARE IL FISSAMAIUSCOLE, L'UTENTE 


DEVE PREMERE DI NUOVO 


COMMAND j TT 


COME CORREGGERE GLI ERRORI DI IMPOSTAZIONE 

L'utente può correggere un errore di impostazione sia prima che dopo 
aver introdotto una linea. 
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di un errore dopo aver 
completato la linea 
(cioè dopo aver premu- 


CR 


E SE 

si tratta di una linea 
di programma 


può sostituire la linea 
errata, introducendo 
una nuova linea con lo 
stesso numero di linea 
LA NUOVA LINEA SOSTI¬ 
TUIRÀ 1 IN MEMORIA LA 
PRECEDENTE 


può entrare in Stato 
Editor e usare i coman¬ 
di dell'Editor per mo¬ 
dificare la linea (ve¬ 
dere Capitolo S) 


CALCOLI IMMEDIATI CON L'M20 


L'utente può utilizzare il sistema M20 come una macchina calcolatrice sia 
quando vuole sapere subito il risultato di una espressione, che quando 
vuole verificare se un dato programma funziona correttamente o meno. 

Siamo in BASIC. 11 messaggio OK appare sul video. 


(oppure più semplicemente il 


L'utente può impostare 
solo tasto Eli poi una espressione e 
L'espressione viene valutata e il suo valore viene visualizzato. 

L'utente può anche introdurre Q B-9 Di, poi il nome di una variabile 
(cioè una stringa di caratteri il cui primo carattere è una lettera), 
l’operatore di assegnazione (=), un'espressione e L'espressione 

viene valutata e il suo valore viene memorizzato nella variabile; questa 
può essere utilizzata in calcoli successivi per rappresentare quel 
determinato valore. 


La seguente tabella riporta alcuni esempi di calcoli immediati. 


VIDEO 


COMMENTI 


PRINT 3 
3 
OK 


la costante 3 viene visualizzata (possiamo clas¬ 
sificare una costante come il caso più semplice 
di espressione) 


PRINT 2+3 
5 
OK 


L'espressione 2+3 viene valutata e il suo valore 
(5) viene visualizzato 


► 
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LET A = 15.21 

OK 


la costante 15.21 viene assegnata alla variabile 
A. L'utente può utilizzare la variabile A in 
calcoli successivi per rappresentare detto valo¬ 
re. 

? A-1 


l'espressione A-1 viene valutata e il suo valore 

14.21 


(14.21) viene visualizzato. 

OK 


Nota: E' possibile impostare ? invece di PR1NT 

B = 2.3 


la costante 2.3 viene assegnata alla variabile 

OK 


B. La parola chiave LET può essere omessa, l'u¬ 
tente può iniziare la linea con il nome di una 
variabile 

? A*B 


l'espressione A*B viene valutata. 11 simbolo * 

34.983 


significa moltiplicato. 11 valore 34.983 viene 

OK 


visualizzato. 

? A*B-40 


l'espressione A*B-40 viene valutata e il suo 

-5.017 


valore (-5.017) viene visualizzato. Si noti che 

OK 


se il valore di una espressione è negativo il 
segno meno (-) viene sempre visualizzato, mentre 
se il suo valore è positivo il segno più (+) 
viene sostituito da uno spazio 


UN SEMPLICE PROGRAMMA 


Si può utilizzare il sistema M20 anche per memorizzare ed eseguire un 
programma BASIC. 

Eseguendo un programma, l'utente può risolvere problemi che non è 
possibile risolvere utilizzando il sistema M20 come una qualsiasi 
macchina calcolatrice. 

Un programma BASIC consiste di un insieme di istruzioni. 

Un'istruzione è un'entità elementare di programma che dice al BASIC di 
svolgere una ben determinata operazione. 

E' possibile impostare linee con una o più istruzioni. In questo ultimo 
caso le istruzioni vengono separate l'una dall'altra dal segno di 
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punteggiatura due punti (:). 


In un programma BASIC ogni linea inizia con un numero intero 
(compreso tra 0 e 65529) e finisce quando l'utente preme il tasto 


positivo 


CR« 


Siamo in BASIC. Sul video appare il messaggio OK. L'utente può iniziare a 
introdurre in memoria da tastiera delle istruzioni. Ad esempio le 
seguenti : 


10 REM RETTANG0101 | 

20 INPUT "Base"; B \ 

30 IF B< =0 THEN 20 _ 

40 INPUT "Altezza"; H 

50 IF H < =0 THEN 40 |£1 

60 LET AREA = B*H «31 

70 PRINT "Area=";AREA;" H=";H 

80 goto 20 «a 

90 END Wgm 


Queste istruzioni formano un programma completo. Questo programma permet¬ 
te di risolvere un problema molto semplice; il problema consiste nel 
trovare l'area di un rettangolo introducendo da tastiera i valori della 
base e dell'altezza. 

Questo esempio è stato scelto sia per la sua semplicità sia per illustra¬ 
re un certo numero di prestazioni del linguaggio BASIC. 

Non si esclude che si possano realizzare programmi più efficienti per 
risolvere lo stesso problema (vedere Capitolo 3). 

Nel programma appena esaminato abbiamo impostato un'istruzione per ogni 
linea, ma avremmo anche potuto impostarne più di una, (utilizzando il 
separatore due punti (:)), riducendo così il numero di linee. Ad esempio: 


10 REM RETTANG0L01 EDI 

20 INPUT "Base" ;B : IF B<=0 THEN 20 E 

30 INPUT "Altezza";H:lF H<=0 THEN 30 

40 let area=b*h «ni 

50 PRINT "Area=";AREA;" B=";B;" H=";H 
60 GOTO 20: END «31 
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L'utente può introdurre fino a 255 caratteri per ogni linea (logica), 
compreso il numero di linea. Una linea logica può comprendere più linee 
fisiche. Per esempio: 

20 INPUT "Base";B: 1F B<=0 

THEN 20 EOI 

è una linea logica comprendente due linee fisiche. Per cambiare linea 
prima di raggiungere il margine del video, l'utente deve premere una o 
più volte E«2 jS3 - 


PAROLE CHIAVE (KEYWORDS) 

Ogni istruzione incomincia con una parola chiave, che è una parola 
riservata. Una parola chiave è una parola della lingua inglese con un ben 
preciso significato mnemonico. Dal punto di vista sintattico, deve essere 
preceduta e seguita da almeno uno spazio. 

Nota : Una parola chiave non può essere usata come nome di una variabile. 

La parola chiave indica il tipo d'istruzione da eseguire. Dopo la parola 
chiave l'utente può introdurre uno o più operandi (costanti o variabili) 
o espressioni. Alcune istruzioni hanno più di una parola chiave ad 
esempio IF... THEN. Le istruzioni del nostro programma contengono le 
parole chiave REM, INPUT, 1F... THEN, LET, PR1NT, GOTO e END. L’utente 
può introdurre le parole chiave sia in lettere maiuscole che in lettere 
minuscole. In questo caso vengono convertite in lettere maiuscole quando 
si lista il programma (vedere Capitolo 2). 

In BASIC sono parole riservate sia le parole chiave, sia i nomi dei 
comandi (ad esempio RUN, LIST, ecc...) e i nomi di funzione (ad esempio 
SIN, COS, ecc...). Vedere Appendici C,D e E per una lista completa. 

COSTANTI 


1 numeri scritti in un programma BASIC (quali ad esempio 0, 150,-31.7) 
vengono denominati "costanti numeriche" e le stringhe di caratteri (quali 


"Base", "Altezza", "Area=", 


" B=" e " H") vengono denominate "costanti 


stringa". Questo significa che i loro valori rimangono gli stessi durante 


tutto il programma. Per esempio quando la costante 150 appare in un 


programma, questo valore resta immutato per tutta la durata del 


programma. 

Le costanti numeriche possono essere numeri interi (ad es. 150) o meno 
(numeri "reali"), ad es. 31.7. 
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Le costanti stringa sono sempre comprese fra virgolette, a meno che non 
venga specificato altrimenti. Stringhe non comprese tra virgolette sono 

messe solo all'interno di istruzioni DATA o in risposta a una istruzione 
INPUT o LINE INPUT. 

Per ulteriori dettagli vedere Capitolo 4. 


VARIABILI 

In un programma se un dato viene rappresentato da un nome, il suo valore 
può variare durante l'esecuzione. Si parla in questo caso di una 
variabile anziché di una "costante". 11 nome di una variabile può 
essere di qualsiasi lunghezza. 11 primo carattere deve essere una 
lettera. Esempi di variabili nel nostro programma sono: 

B , H , AREA 

Come abbiamo visto per le parole chiave, i nomi delle variabili possono 
essere introdotti sia in lettere maiuscole che minuscole. In quest'ultimo 
caso vengono convertite in lettere maiuscole quando si lista il 
programma. Per ulteriori dettagli vedere Capitolo 4. 


USO DEGLI SPAZI 

L'utente, per rendere il suo programma più leggibile, può introdurre 
degli spazi in qualsiasi posizione. Infatti non ci sono limitazioni 
nell uso degli spazi, ad eccezione delle seguenti: 

- almeno uno spazio deve precedere e seguire una parola chiave, 

- gli spazi sono significativi solo all'interno delle costanti stringa, 

gli spazi non sono ammessi all'interno delle costanti numeriche 
(inclusi i numeri di linea), le parole chiave, i nomi delle variabili e 
i nomi delle funzioni. 

Per esempio: 

20 INPUT "Base";B 
e 

20 INPUT "Base"; B 

sono istruzioni equivalenti, ma 

20 INPUT "B a s e";B 

è una istruzione diversa, dato che contiene una stringa di caratteri più 
lunga. 
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COMMENTI 

L'utente può documentare il proprio programma tramite l'istruzione REM 
(Remark). Dopo la parola chiave REM è possibile scrivere una qualsiasi 
stringa di caratteri stampabili ASCII. Per esempio: 

10 REM RETTANGOLA «HI 

E' anche possibile inserire commenti in un programma introducendo una 
stringa di caratteri stampabili ASCII preceduta da un apostrofo (') e 
chiusa da HM*H 

Questa stringa è detta "campo commento". 

Per esempio: 

100 GOTO 100 'Cicla indefinitamente H&fl 

Sia le istruzioni REM, sia i campi commento possono essere inseriti in un 
punto qualsiasi di un programma. Dal punto di vista dell'esecuzione due 
programmi uno con, l'altro senza commenti sono assolutamente equivalenti, 
ma i commenti figurano nel listing (lista) del programma e consentono di 
avere un programma di facile comprensione in quanto "autodocumentato". 
Per ulteriori dettagli vedere capitolo 2. 

ESECUZIONE DEL PROGRAMMA 

Proviamo a eseguire il programma che calcola l'area di un rettangolo. Se 
le linee del programma sono state impostate in tastiera una dopo l'altra 
(e l'M20 non è stato spento nel frattempo) il programma è in memoria. 
Impostiamo: W 11 fcJ UBI; il listing del programma apparirà su 
video. Alla fine del listing appare OK. 

Impostiamo allora d Q IBI HI . 


1-11 




LIST 

10 REM RETTANG0L01 
20 INPUT "8ASE";B 
30 IF B < = 0 THEN 20 
40 INPUT "Altezza";H 
50 IF H < =0 THEN 40 
60 LET AREA=B*H 

70 PR1NT "Area=";AREA;" B=";B;" H=";H 

80 GOTO 20 

90 END 

OK 

RUN 

Base? 3.5 
Altezza? 4.2 

Area= 14.7 B= 3.5 H= 4.2 

Base? -7.3 

Base? -7.3 

Altezza? 1.3Q 

?Redo from start 

Altezza? 1.32 

Area= 9.636 B= 7.3 H= 1.32 

Base?AC 

Break in 20 

OK 


H= 1.32 


COMMENTI 


l’M20 inizia a eseguire le istru¬ 
zioni in modo sequenziale a par¬ 
tire dall'istruzione 10 (che in 
questo caso non viene eseguita 
dato che è un commento). 

Quando il controllo raggiunge una 
istruzione INPUT (vedere le i- 
struzioni 20 e 40) l’esecuzione 
del programma viene sospesa e 
l’M20 emette un messaggio indi¬ 
cando all'utente che deve intro¬ 
durre un valore da tastiera. Ad 
esempio possiamo impostare 3.5 
per la base e 4.2 per l'altezza. 

L'istruzione 60 calcola il valore 
della variabile AREA. L'istruzio¬ 
ne 70 visualizza questo valore, 
come pure i valori delle variabi¬ 
li B e H. L'istruzione 80 riporta 
il controllo all'istruzione 20. 

Se l'utente introduce un valore 
negativo per B (ad es.-7.3), 
l'istruzione 20 viene eseguita di 
nuovo, dato che l'istruzione 30 
ritorna il controllo all’istru¬ 
zione 20 se il valore di B è 
negativo o zero. 

Se l'utente introduce un valore 
negativo di H, l'istruzione 40 
viene eseguita di nuovo, dato che 
l'istruzione 50 ritorna il con¬ 
trollo all'istruzione 40, se il 
valore di H è negativo o zero. 

Se l'utente introduce un valore 
stringa per B o H (ad es.1.3Q 
per H) l'M20 visualizza un mes¬ 
saggio d'errore: 


?Redo from start 
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e l'utente deve introdurre un 
nuovo valore. L'esecuzione di 
questo programma termina solo se 
l'utente preme PHtlil PB . In tal 
caso l'M20 visualizza un mes¬ 
saggio di interruzione (Break) e 
passa in Stato Comandi. Per ri¬ 
prendere l'esecuzione l'utente 
deve impostare : 



MODALITÀ* OPERATIVE 


11 BASIC ha tre modalità operative. 


MONDALITA OPERATIVE 



Figura 1-3 Modalità Operative 


STATO COMANDI 


Quando l'M20 entra in Stato Comandi, visualizza il messaggio: 


OK 


In Stato Comandi, il BASIC non 
tastiera finché l'utente non preme 


accetta 


CR 


ciò che l'utente imposta in 
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Linee Programma e Linee Immediate 


L'M20 non prende in considerazione eventuali spazi iniziali su una linee 
BASIC, ma interpreta il primo carattere diverso da uno spazio. Se questo 
carattere non è una cifra, il BASIC considera la linea come una "linea 
immediata" (cioè ad esecuzione immediata). Se è una cifra, il BASIC 
considera la linea come una "linea di programma" (vedere più avanti). 


SE. 


ALLORA. 


l'utente imposta una 
linea di programma, 
cioè un numero di li¬ 
nea (tra 0 e 65529), 
seguito da uno o più 
comandi o istruzioni 
BASIC separati da due 
punti (:) e alla fine 
preme 


la linea viene trasferita in memoria, quando 
l'utente preme HQQH* La linea non viene 
eseguita finché l'utente non imposta KfM BB JJJ 
■SI. Per esempio: 

100 PR1NT "11 LOG di 5 è";L0G(5) 


uà 

i 

preme j 



, il BASIC trasferisce in memoria la 
linea. Per eseguire la linea si deve impostare 

looea 


l'utente imposta una 
linea immediata, cioè 
uno o più comandi o 
istruzioni BASIC se¬ 
parati da due punti 
(: ) e alla fine 
preme BU 


la linea viene eseguita non appena l'utente 
preme M:» - 

PRINT "11 LOG di 5 è";L0G(5) 

è un a "linea immediata". Quando l’utente preme 
Sii, il BASIC la esegue. 


l'utente imposta una 
sequenza di linee di 
programma. 


le linee vengono trasferite in memoria in modo 
da formare un programma BASIC. 

Queste linee vengono memorizzate secondo la 
sequenza dei numeri di linea, indipendentemente 
dall'ordine in cui sono state introdotte. 

Il programma non viene eseguito finché l'utente 
non imposta 
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Modi 

Lo Stato Comandi comprende i seguenti Modi: 

- Modo Immediato (o Diretto), quando l'utente imposta una linea ad 
esecuzione immediata 

- Modo Programma, quando l'utente imposta una linea di programma. 


STATO ESECUZIONE 

Si dice che il sistema M20 è in Stato Esecuzione, quando esegue sia 
istruzioni o comandi BASIC, sia comandi PCOS. 

Un programma BASIC viene eseguito secondo la sequenza ascendente dei 
numeri di linea, a meno che un'istruzione di controllo come GOTO, 
ON...GOTO, 1F.. .THEN...ELSE, IF.. .GOTO...ELSE, FOR/NEXT, WH1LE/WEND 
specifichi altrimenti. 


STATO EDITOR DI LINEA 


11 sistema BASIC comprende un Editor per poter correggere le linee di 
programma. Questo è molto utile per poter modificare linee lunghe e 
complesse senza bisogno di riscriverle completamente. 


SE l'utente deside¬ 
ra modificare... 


la linea attuale 
(numero di linea 
11. .. 1 ) 


una linea specifi¬ 
cata (numero di 
linea nn...n) 


ALLORA egli deve 




impostare... 


il BASIC visua¬ 
lizza 


SPACE 


11...1 


SPACEl 


nn.. « n 


Nota : La linea attuale è l'ultima linea impostata, modificata o che ha 
dato luogo a un messaggio d'errore. 

Se l'M20 entra in Stato Editor, l’utente può incominciare a modificare la 
linea (cancellando, inserendo e rimpiazzando i caratteri) facendo uso dei 
comandi dello Stato Editor (vedere Capitolo 3). 
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In Stato Editor il BASIC prende in esame i caratteri introdotti da 
tastiera di vo lta in volta che vengono impostati, senza aspettare che 
l'utente prema Uri . 


Impostando 


CR 


il BASIC esce dallo Stato Editor. 


Errori di sintassi 

Se durante 1 esecuzione di una linea di programma viene riscontrato un 
errore sintattico, il sistema M20 visualizza: 

Syntax error in nn...n 

OK 


nn.. .n 


e automaticamente entra in Stato Editor. 

Qui nn...n sta a indicare il numero di linea dove è stato riscontrato 
1'errore. 

Stati dell'Editor 

L'Editor include i seguenti Stati: 

- Stato Cancellazione 

- Stato Modifica 

- Stato Inserimento 

Per entrare e uscire da questi Stati l'utente deve usare i corrispondenti 
comandi dell'Editor (vedere Capitolo 3). 


ISTRUZIONI E COMANDI BASIC 

Risulta a volte difficile distinguere un'istruzione BASIC da un comando 
BASIC, poiché entrambi possono essere usati in un programma o in una 
linea immediata, ma: 

- le istruzioni BASIC sono generalmente usate in linee di programma e 
vengono impostate in sequenza per formare un programma (eccezione fatta 
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per PR1NT, LPR1NT, LET e SWAP che sono anche usate spesso in linee 
immediate, quando viene usato l'M20 come una macchina calcolatrice sia 
per visualizzare subito il risultato di un calcolo, sia per verificare 
se un programma è corretto visualizzando il contenuto delle variabili 
di programma) 


- 1 comandi BASIC sono usati per la gestione dei files o per lanciare 
programmi di servizio (Utilities) come per esempio quando si listano i 
programmi o si azzera la memoria. Essi sono generalmente usati in linee 
immediate eccezione fatta per CLEAR, KILL, IOAD, RUN, SYSTEM, TROFF, 
TRON e W1DTH che sono usati con una certa frequenza anche in un 
programma. 

Nel seguito del manuale, quando verrà introdotta una istruzione o un 

comando BASIC, scriveremo a fianco del suo nome: 

- (IMMEDIATO), se può essere usato solo in modo immediato 

- (PROGRAMMA), se può essere usato solo in un programma 

- (PR0GRAMMA/1MMED1AT0), se può essere usato sia in un programma, sia in 
modo immediato. 


COME CAMBIARE MODALITÀ’ 0 AMBIENTE 


E 1 possibile cambiare modalità operative (Stato Comandi, Esecuzione, 
Editor) o ambiente (PCOS o BASIC) se l'utente imposta un apposito comando 
o se si verificano determinate condizioni. 

La seguente tabella indica tutti i casi possibili. 


SE L'M20 è in... 


E SE... 


ALLORA... 


Stato Esecuzione 


l'utente imposta 


CTRL 


l’esecuzione viene in¬ 
terrotta e l'M20 entra 
nello Stato Comandi 


mentre l'M20 sta ese¬ 
guendo un programma 
BASIC o una linea 
a esecuzione 
immediata 


BASIC 


► 
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Stato Comandi 
BASIC 


l'esecuzione di un 
programma o di un 
comando BASIC viene 
portata a termine 
(o viene riscontrato 
un errore - escluso 
un errore sintattico) 


l'utente imposta una 
linea immediata 


l'utente imposta 


s ■ y ■ s i 


Nota : SYSTEM può anche 
essere usato in un 
programma BASIC. 


l'M20 entra in Stato 
Editor di Linea 


l'M20 entra in Stato 
Comandi BASIC 


l'M20 entra in Stato 
Esecuzione 


l'M20 entra in PCOS e 
la memoria a disposi¬ 
zione dell'utente vie¬ 
ne azzerata. 



l'M20 entra in Stato 
Editor di Linea 


la memoria viene az¬ 
zerata, il PCOS e il 
BASIC vengono nuova¬ 
mente caricati in me- 
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Stato Editor 
di Linea 


l'utente preme 


CR 


1 1 M2 0 entra in Stato 
Comandi BASIC.(L'ulti¬ 
ma linea modificata 
viene visualizzata). 


l'utente preme 
(Exit) 


1'utente preme E 
(Quit Editing) 


l'utente preme 


SHIFT ■ RESET 


1’M20 entra in Stato 
Comandi BASIC. (La 
parte restante del¬ 
l'ultima linea mo¬ 
dificata non viene 
visualizzata). 


l'M20 entra in Stato 
Comandi BASIC e can¬ 
cella tutte le modifi¬ 
che fatte sulla linea. 


la memoria viene az¬ 
zerata, il PCOS e il 
BASIC vengono 
nuovamente caricati in 
memoria 


PCOS 


l'utente imposta 


l'M20 entra in Stato 
Comandi BASIC 


l'utente imposta 
qualsiasi altro 
comando PCOS 


l'M20 entra in Stato 
Esecuzione 


l'utente imposta: 


SHIFT «RESET 


la memoria viene az¬ 
zerata, il PCOS e il 
BASIC vengono 
nuovamente caricati in 
memoria 
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INTRODUZIONE, LISTING ED ESECUZIONE 
DI UN PROGRAMMA 






SOMMARIO 


Questo capitolo illustra la sintassi adottata nel manuale per descrivere 
la struttura di una istruzione o di un comando o di una funzione; viene 
quindi spiegato come documentare un programma, come introdurlo in memoria 
da tastiera, come listarlo, trasferirlo da memoria a disco e viceversa e 
come eseguirlo. 
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SINTASSI ADOTTATA 


La sintassi adottata per descrivere la struttura di un comando, di 
un istruzione o di una funzione BASIC si basa sui d-iagrammi sintattici 
(syntax diagrams). 

Un diagramma sintattico è un grafo con una sola entrata ed una sola 
uscita. Ogni percorso attraverso il grafo rappresenta una possibile 
sequenza di simboli. 

La seguente tabella enumera le regole da seguire per disegnare un 
diagramma sintattico. 


N° 


1 


2 


REGOLA 


tutte le parole e tutti i 
simboli racchiusi in ova¬ 
li o in cerchi devono es¬ 
sere impostati esattamen¬ 
te come indicato nella 
sintassi. 

tutte le parole racchiuse 
in un rettangolo rappre¬ 
sentano nomi di parametri 
usati in istruzioni o co¬ 
mandi o funzioni. 

il significato di ogni 
parametro viene descritto 
nel testo che segue alla 
sintassi (quando non è di 
immediata interpretazio¬ 
ne) . 


una diramazione indica 
una scelta: l'utente deve 
scegliere uno dei percor¬ 
si . 

Per esempio, dopo RUN è 
possibile: 

- impostare un numero di 
linea 

OPPURE 


ESEMPIO 




► 
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questo manuale indica in 
lettere maiuscole le pa¬ 
role riservate del BASIC, 
anche se l'utente può 
impostarle in lettere mi¬ 
nuscole. Alcuni esempi di 
parole riservate sono in¬ 
dicati a lato (sono le 
parole chiave del nostro 


1F...THEN 

LET 



6 


programma RETTANG0L01) 


anche i nomi dei comandi 
PCOS sono mnemonici. Per 
esempio : 

basic - va in BASIC 
vcopy - copia un volume 

ecc. 

L'utente deve introdurli 
in lettere minuscole o in 
maiuscole o in forma ab¬ 
breviata (solo le prime 
due lettere), come indi¬ 
cato nel diagramma sin¬ 
tattico qui a lato. 
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COME DOCUMENTARE UN P806RAHMA 

Spesso l'utente desidera inserire commenti in un programma per renderlo 
più leggibile e di più immediata comprensione. Ciò può essere fatto in 
due modi: 

- utilizzando istruzioni REM 

- utilizzando campi commenti. 


REM/CAMPI COMMENTI (PROGRAMMA) 


L'istruzione REM (Remark) è una delle possibilità offerte dal BASIC per 
documentare un programma. L'utente può inserire qualsiasi stringa di 
caratteri dopo REM. Un'altra possibilità offerta dal BASIC è quella di 
inserire un campo commento, cioè una stringa di caratteri preceduta da un 
apostrofo (') e chiusa da Bffl. 



Sintassi 2-1 Istruzione REM 



Sintassi 2-2 Campo Commento 
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Eseapi 


SE l'utente imposta 


10 REM RETTANG0L01 


100 REM SUBR0UT1NE1 


10 'RETTANG0L01 


CR 


CR 


CR 


ALLORA... 


una istruzione REM dà il titolo al 
vostro programma. E' buona norma di 
programmazione dare sempre un tito¬ 
lo a ogni programma 


una istruzione REM segna l'inizio 
di una subroutine (vedere capitolo 
10). E' buona norma di programma¬ 
zione dare sempre un titolo a ogni 
subroutine 


un campo commento dà il titolo al 
vostro programma. 


150 LET A=(A1+A2)/2 'Media 


CR 


Nota : In questo caso l'apostrofo ha 
la stessa funzione della parola 
REM, dato che il campo commento 
occupa un'intera linea 


un campo commento è inserito a fine 
istruzione 


Note 

Una istruzione REM non può essere incorporata in una linea con più istru¬ 
zioni. 

Un campo commento può: 

- occupare un'intera linea (in tale caso l'apostrofo ha la stessa fun¬ 
zione di una-istruzione REM) 

- essere inserito a fine istruzione. 

Sia le istruzioni REM, sia i campi commento possono essere inseriti in 
qualsiasi punto del programma. Non sono istruzioni eseguibili, ma appaio¬ 
no nel listing. 
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INTRODUZIONE DI UN PROGRAMMA DA TASTIERA 

Il messaggio OK è sul video. Il BASIC è in attesa che l’utente introduca 
dei caratteri da tastiera. E' possibile iniziare subito introducendo la 
prima istruzione iniziando a impostare il numero di linea (ad esempio 
10). Però l'utente può anche richiedere che il sistema faccia la 
numerazione automatica di linee. Questa richiesta viene fatta tramite il 
comando AUTO (descritto in seguito). 

Però se l'utente ha già introdotto un programma e vuole introdurne un 
altro, deve, per prima cosa, impostare il comando NEW, che azzera la me¬ 
moria. 

Il programma può anche essere cancellato dalla memoria sia caricando un 
nuovo programma da disco, sia introducendo un comando SYSTEM (per tornare 
al PCOS), sia spegnendo la macchina. In questi casi, sarebbe utile che 
l'utente, in precedenza, avesse registrato il programma (a meno che già 
non ne abbia una copia). 

Impostiamo il nostro semplice programma (RETTANG0L01) in tastiera. Per 
prima cosa impostiamo: 


SPACE ■ CR 


che azzera la memoria. 


Poi introduciamo: 


10 REM RETTANG0L01 
20 INPUT "Base";B | 

30 1F 8< =0 THEN 20 
40 INPUT "Altezza";H 
50 IF H < =0 THEN 40 

60 LET AREA = 8*H _ 

70 PRINT "Area=";AREA;" B=";" H=";H 
80 GOTO 20 
90 END DI 


CR 


CR 


CR 


CR 


CR 


CR 


CR 


Conviene usare un intervallo di 10 fra ogni numero di linea. Questo per¬ 
mette all'utente di modificare facilmente un programma inserendo istru¬ 
zioni fra le linee già esistenti. 

Le linee di programma sono ordinate in memoria secondo la sequenza del 
numero di linea, non nell'ordine in cui sono state introdotte in tastie¬ 
ra . 
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Per esempio, se impostiamo prima l'istruzione 50, poi la 10 eco... fino a 
impostarle tutte ma in un ordine qualsiasi noi introduciamo in tastiera 
il medesimo programma. 

L'utente può introdurre parole chiave e nomi di variabili sia con lettere 
maiuscole che con lettere minuscole. Queste ultime verranno convertite 
nelle corrispondenti maiuscole quando si richiede il listing del pro¬ 
gramma. 


AUTO (IMMEDIATO) 

Fa iniziare la numerazione automatica delle linee. 



Sintassi 2-3 Comando AUTO 

Dove 




ELEMENTO DI SINTASSI 

SIGNIFICATO 

VALORI DI DEFAULT 

line number 

è il primo numero 
di linea generato 

il primo numero 
di linea generato 
è il numero della 
linea attuale 

10 

interval 

è l'intervallo tra 
i numeri di linea 

10 
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Esempi 


SE l’utente imposta. 


ALLORA la numera¬ 
zione di linea inizia. 


E l'intervallo di 
linea è... 


AUTO 


alla linea 10 (va¬ 
lore di default) 


10 (valore di de¬ 
fault) 


AUTO.,30 


alla linea attua¬ 
le 


30 


AUTO 100 


alla linea 100 


10 (valore di de¬ 
fault) 


AUTO 150, 


alla linea 150 


l'ultimo intervallo 
specificato da un 
precedente comando 
AUTO o se non ve ne 
è stato uno, 10 (il 
valore di default) 


AUTO 200,20 


alla linea 200 


20 


Un Asterisco dopo un Numero di Linea 


SE... 


ALLORA... 


AUTO genera un numero 
di linea già esistente 


un asterisco compare sul video dopo il numero 
di linea per avvertire l'utente che egli sta 
per sostituire una linea già esistente. Comun¬ 
que, premendo MNM immediatamente dopo l'aste¬ 
risco, si lascia inalterata la linea esistente 
e si genera il prossimo numero di linea. 


Nota : Questo può succedere solo se si introduce 
AUTO quando un programma è già esistente in 
memoria. 


2-7 






















Per Terminare la Numerazione Automatica 


SE l'utente 


CTRL 


imposta... 


ALLORA... 


la numerazione 
l'M20 entra in 


automatica viene 
Stato Comandi. 


interrotta e 


Nota : Quando si imposta 
attuale viene cancellata 


CTRL 


C 


la linea 


NEW (PR0GRAMMA/1MMEDIAT0) 

Cancella il programma residente in memoria e le variabili, permettendo 
all'utente di introdurre un nuovo programma. 

NEW setta a zero il bit di "trace" (tracciamento) allo stesso modo del 
comando TROFF (vedere capitolo 13) e chiude tutti i file dati (vedere 
capitolo 12). 



Sintassi 2-4 Comando NEW 


Esempi 


SE l'utente imposta... 


NEW 


CR 


10 REM RETTANGOLO 1 


CR; 


20 INPUT "Base" 


CR 


ALLORA... 


il programma residente in memoria viene 
cancellato, insieme alle sue variabili. 


l'utente può quindi introdurre un nuovo 
programma da tastiera. 
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Nota : Non è necessario impostare NEW prima 
di trasferire in memoria un programma da 
disco, tramite il comando LOAD o RUN (questi 
comandi azzerano la memoria automaticamen¬ 
te). 


COME LISTARE UN PROGRAMMA 


Quando un programma è in memoria, può essere listato. Per listare un 
programma, l'utente può introdurre il comando LIST (il "listing" 
comparirà sul video), oppure il comando LL1ST (il "listing" comparirà su 
stampante). L'utente non può listare un programma protetto (registrato 
con l'opzione P). 

Quando si lista un programma le parole riservate (parole chiave, nomi di 
variabile e nomi di funzione) che l'utente aveva impostato in lettere 
minuscole, vengono convertite in lettere maiuscole e il punto interroga¬ 
tivo (?) eventualmente usato al posto della parola chiave PR1NT viene 
convertito in PR1NT. Inoltre le linee vengono visualizzate per numero di 
linea crescente indipendentemente dall'ordine con cui sono state 
impostate. 


Per listare il programma RETTANG0L01 sul video, impostiamo 
■Q3. Sul video apparirà: 


LIST 

10 REM RETTANGOLA 
20 INPUT "8ase";B 
30 1F L<=0 THEN 20 
40 INPUT "Altezza";H 
50 1F H<=0 THEN 40 
60 LET AREA=B*H 

70 PR1NT "Area=";AREA;" B=";B;" H=";H 
80 GOTO 20 
90 END 
OK 


2-9 








Alla fine della lista l'M20 entra in Stato Comandi e visualizza OK. 
L1ST/LL1ST (IMMEDIATI) 

LIST lista le linee di programma sul video, LLIST lista le linee di 
programma su stampante. 



Sintassi 2-5 Comando LIST 



Sintassi 2-6 Comando LLIST 
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SE l'utente imposta, 



LIST .-500 


l'intero programma viene listato 


la linea 150 viene listata 


la linea attuale viene listata 


vengono listate la linea 200 e tutte le suc¬ 
cessive 


vengono listate tutte le linee dall'inizio 
alla linea 1000 


vengono listate tutte le linee dalla linea 
100 alla 190 


vengono listate tutte le linee dalla linea 
attuale alla 500 


Per Interrompere una Lista 



l'utente imposta: 


l'intero programma è 
stato listato 


ALLORA... 

la lista del programma viene sospesa, senza 
che il sistema entri in Stato Comandi. 

L'utente può continuare la lista premendo 
un qualsiasi tasto 

l'M20 entra in Stato Comandi interrompendo 
definitivamente la lista 


l'M20 entra in Stato Comandi 


























FILE PROGRAMMA E FILE DATI 


Un file è una sequenza di istruzioni (file programma) o di dati (file 
dati), sequenza che può essere memorizzata su disco. 

La seguente tabella sintetizza le caratteristiche principali di un file 
programma e di un file dati. 


TIPO DI FILE 

SIGNIFICATO 

file programma 

un file programma è una sequenza di linee di 
programma. Queste vengono memorizzate se¬ 
condo la successione crescente dei numeri di 
linea, indipendentemente dall'ordine in cui 
sono state impostate. Un file programma 
viene memorizzato in un formato binario 
"compatto" e registrato su disco o in questo 
formato o in un formato "sorgente" ASCII (se 
l'utente usa l'opzione A per registrarlo). 1 
file in formato ASCII sono sequenze di 
caratteri ASCII e rappresentano effetti¬ 
vamente la sequenza di caratteri che appare 
su video quando l'utente lista il programma. 
Quando un programma viene trasferito da 
disco a memoria (tramite un comando LOAD o 
RUN), esso viene sempre convertito in 
formato "compatto". 

file dati 

un file dati è una sequenza di dati numerici 
e/o stringa registrata su disco. 

Un file dati viene creato tramite un 
programma BASIC. Per prima cosa, deve essere 
aperto tramite una istruzione OPEN che ne 
specifichi il nome, il metodo d'accesso e 
associ al file un numero di file da 1 a 15. 
Ogni successiva istruzione di Input/Output 
nel programma farà riferimento al file 
tramite questo numero. 

Quando il programma non deve più leggere o 
registrare dati sul file è buona norma di 
programmazione "chiuderlo" tramite una i- 
struzione CLOSE. In ogni caso tutti i file 
dati vengono chiusi quando il programma 
termina con una istruzione END. 
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Nota : Chiudere un file dati significa 
impedirne l'accesso da programma. 11 pro¬ 
gramma, per poter accedere di nuovo a quel 
file deve riaprirlo tramite un’altra istru¬ 
zione OPEN associandovi un nuovo (o lo 
stesso) metodo d'accesso e un nuovo (o lo 
stesso) numero di file. Soltanto il nome 
dovrà essere lo stesso. 


IDENTIFICATORI DI FILE E DI VOLUME 

Un disco può contenere uno o più file programmi e/o file dati. Un singolo 
file non può essere’registrato su due o più dischi. 

L'insieme di file registrati su un unico disco è denominato "volume". 

Ogni file e ojni volume hanno un proprio identificatore. Non è possibile 
avere due file con lo stesso nome su uno stesso volume. Se si registra un 
file programma su un disco dove esiste già un file con lo stesso nome, il 
nuovo file sostituisce il precedente. 

Si può assegnare un identificatore ad un file sia tramite un'istruzione 
OPEN (file dati), sia tramite un comando SAVE (file programma) e sia 
tramite un comando fnew. 

Si può assegnare un identificatore a un volume o con un comando vformat o 

con un comando vnew o con un comando vrename. 

Il sistema riconosce un identificatore di volume e può accedere a uno dei 

suoi file soltanto se il disco corrispondente è stato inserito in una 

delle due unità disco. 
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volume identifier 



Sintassi 2-7 Identificatore di File e di Volume 


Dove 


ELEMENTO 01 SINTASSI 

volume name 
(nome di volume) 


SIGNIFICATO 

stringa di (al massimo 14) caratteri stampabili 
ASCII (alcuni caratteri non sono ammessi, 
vedere Caratteri Illegali in questo paragrafo). 

Per selezionare un volume in un comando PCOS o 
BASIC o in una istruzione OPEN, l'utente deve 


specificare un nome di volume oppure un numero 


di unità disco. 
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Il nome di volume (come pure il numero di unità 
disco) può essere seguito da una password di 
volume. Alla fine di un identificatore d: : 
volume, l'utente deve impostare il carattere 
due punti (:). 

Per esempio: 

SAVE "VOLI :F1LE1" EJ 

Qui VOLI è un nome di volume; FILEI è un nome 
di file e l'intera stringa VOLI :FILEI è un 
identificatore di file. Tramite questo comando 
l'utente registra il file programma FILEI sul 
disco che ha nome VOLI. (Per ulteriori dettagli 
vedere il comando SAVE in questo capitolo). 

Nota : Quando l'utente specifica un identifica¬ 
tore di file o di volume in una istruzione o in 
un comando BASIC, deve racchiudere l'identifi¬ 
catore tra virgolette ("), oppure scrivere una 
variabile stringa, o una espressione stringa il 
■cui valore è l'identificatore. 

Quando specifica un identificatore di file o di 
volume in un comando PCOS, non deve racchiudere 
l'identificatore tra virgolette. 

Per esempio: 

vn VOLI : PEI 

Si noti inoltre che tutti i comandi e le 
istruzioni BASIC possono solo specificare un 
identificatore di volume come facente parte di 
un identificatore di file. Fa eccezione il solo 
comando F1LES, quando viene utilizzato per 
visualizzare l'elenco di tutti i file di un 
volume. 

Per esempio: 


F1LES "VQL2 : " PEI 





drive number (numero 
unità disco) 


file password 
(password di file) 
OPPURE 


volume password 
(password di volume) 


file name 
(nome di file) 


il drive number può essere 0 (che indica la 
prima unità, sulla destra), oppure 1 (che 
indica la seconda unità, sulla sinistra) 

Per esempio: 

LOAD "1:F1L£002” 

Qui 1 : indica che il file F1LE002 risiede sul 
disco inserito nella unità 1. 11 comando 
trasferisce il programma da disco a memoria 
(per ulteriori dettagli vedere il comando LOAD 
in questo capitolo) 


stringa di (al massimo) 14 caratteri stampabili 
ASCII. Alcuni caratteri sono esclusi (vedere 
Caratteri Illegali in questo paragrafo). 


Una password permette di proteggere un volume o 
un file limitandone l'accesso a chi conosca la 
password. Una password può essere impostata 
dopo un nome di volume, o un numero di unità 
disco, o un nome di file e deve essere 
preceduta da una barra (/). 

Per esempio: 

RUN "0:RETTANGOLA/RI" 

Con questo comando l'utente trasferisce da 
disco a memoria il programma RETTANG0L01 che ha 
la password RI e ne lancia l'esecuzione 
RETTANGOLA è registrato sul disco inserito 
| nell'unità 0. (Per ulteriori dettagli vedere il 
comando RUN in questo capitolo) 


stringa di (al massimo) 14 caratteri stampabili 
[ASCII. Alcuni caratteri sono esclusi (vedere 
Caratteri Illegali in questo paragrafo). 

Per selezionare un file in un comando PCOS o 
BASIC o in una istruzione OPEN l'utente deve 
specificare un nome di file. Esso può essere 
preceduto da un identificatore di volume e 
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seguito da una estensione (extension) e/o da 
una password. 

Per esempio: 


SAVE ”1:PR1MENUMBERS/PN" 


CR 


Tramite questo comando l'utente registra il 
file programma PR1MENUMBERS sul disco inserito 
nella unità 1 e dà al file la password PN. 


extension 

(estensione) 


Nota : Se l’utente non specifica un identifica¬ 
tore di volume prima del nome di file, il 
sistema seleziona l'unità selezionata per 
ultima oppure l'unità 0 se nessuna unità era 
stata, in precedenza, selezionata. 

stringa di (al massimo) 12 caratteri stampabili 
ASCII, preceduta da un punto decimale (.). 
Alcuni caratteri sono esclusi (vedere Caratteri 
Illegali in questo paragrafo) 


Nota : filename.extension non può superare 14 
caratteri in totale (compreso il punto) 


Per esempio: 


LOAD "FILEA.CHAR" 


CR 


trasferisce il programma F1LEA che ha l'esten¬ 
sione CHAR da disco in memoria. Esso risiede 
sull'ultima unità selezionata o sull'unità 0 se 
nessuna unità era stata selezionata in prece¬ 
denza . 

Nota : Alcune estensioni hanno un significato 
particolare: BAS (programmi BASIC); CMD (Coman¬ 
di PCOS transienti); SAV (Comandi PCOS tran¬ 
senti, che divengono residenti la prima volta 
che vengono eseguiti). Per ulteriori dettagli 
vedere il "Professional Computer Operating 
System (PCOS) Guida Utente". 
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(Caratteri Illegali 


virgola (,) 

segno di 

barra (/) 

barra rovescia (\) 


numero ( # ) 



più (+) 

E commerciale 

due punti (:) 

apice (') 


(&) 



asterisco (*) 

maggiore di 

segno di 

punto interrogativo 


( >) 

dollaro ($) 

(?) 

virgolette 

uguale (=) 

chiocciola 

punto esclamativo 

<") 


(@) 

(!) 

trattino (-) 

punto e 

spazio 



virgola (;) 




oppure un qualsiasi carattere di controllo 


PASSWORD 


L'utente può proteggere un volume o un file tramite una password (parola 
d'ordine). 

Una password può essere usata per abilitare un volume: un volume è 
abilitato se non ha password oppure se l'utente ha specificato questa 
password in un comando BASIC o PCOS. 

L'utente deve specificare la password in modo corretto tutte le volte che 
nomina un volume o un file ai quali è stata assegnata una password. 


^lota. Nè il BASIC ne il PCOS consentono di venire a conoscere una 
password nell'eventualità che l'utente l'abbia dimenticata. 
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PASSWORD DI VOLUffi 










PASSWORD DI FILE 
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PROTEZIONE DA SCRITTURA 

L'utente può proteggere da scrittura sia un intero volume che un file. 


SE l'utente vuole... 

ALLORA... 

proteggere da scrit¬ 
tura un volume (cioè 
evitare qualsiasi o- 
perazione di scrit¬ 
tura su quel disco) 

deve proteggere l'apposito intaglio con un'eti¬ 
chetta metallizzata. 

togliere la protezio¬ 
ne da scrittura a un 
volume 

deve togliere l'etichetta metallizzata. 

proteggere da scrit¬ 
tura un file 

deve impostare un comando fwprot, specificando 
l'identificatore di file. 

togliere la prote¬ 
zione da scrittura 
a un file 

deve impostare un comando funprot, specificando 
l'identificatore di file. 


REGISTRAZIONE DI UN PROGRAMMA 


Un programma resta in memoria finché la macchina è accesa. Appena si 
spegne la macchina, la memoria viene azzerata e si perde quindi il 
programma. Perciò se l'utente vuole conservare una copia del programma 
che ha appena introdotto in memoria da tastiera, deve impostare un 
comando SAVE (che registra il programma su disco). 

Può essere utile registrare il programma anche in altre occasioni che 
vengono indicate nella seguente tabella. In ognuno dei seguenti casi si 
suppone che il disco sia abilitato, altrimenti l'utente deve specificare 
la password di volume mediante il comando SAVE. Inoltre il disco sul 
quale registriamo il programma non deve ovviamente essere protetto da 
scrittura. 
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SE 1'utente vuole... 

ALLORA... 

spegnere la macchina 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco) 

introdurre un altro 
programma da tastiera 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco) 

trasferire un altro 
programma da disco a 
memoria (tramite un 
comando LOAD o RUN) 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco). 

passare in PCOS (tra¬ 
mite il comando SYS¬ 
TEM) 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco). 

sostituire la ver¬ 
sione precedente del 
suo programma 

deve impostare il programma residente in 
memoria, specificando lo stesso nome della 
versione.precedente 

E 

la stessa password (se la versione precedente 
aveva una password) 

registrare in formato 
ASCII il programma 
residente in memoria 

deve specificare l'opzione A nel comando SAVE 

proteggere il program¬ 
ma residente in memo¬ 
ria contro ogni ten¬ 
tativo di listarlo, 
modificarlo, o regi¬ 
strarlo di nuovo 

deve specificare l'opzione P nel comando SAVE 


Nota : Durante un'operazione di registrazione la luce rossa dell'unità 
disco si accende. Quando si spegne, il programma è registrato e il 
messaggio OK appare su video. 
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SAVE (PROGRAMMA/1MMED1ATO) 

Registra il programma residente in memoria su disco e gli assegna un 
nome ed eventualmente una password 



Sintassi 2-8 Comando SAVE 

Dove 


ELEMETO DI SINTASSI 

SIGNIFICATO 

file identifier 

può essere sia una costante che una variabile 
stringa. Specifica il nome del programma da 
registrare su disco. Può includere una password 
di file e un identificatore di volume 

A 

specifica che il programma deve essere regi¬ 
strato su disco in formato ASCII 

P 

specifica che il programma deve essere regi¬ 
strato su disco protetto contro ogni tentativo 
di listarlo, modificarlo o registrarlo di nuovo 


Esempi 

In ognuno dei seguenti esempi si suppone che il disco sia abilitato e non 
sia protetto da scrittura. 


SE l'utente imposta. 


ALLORA... 


SAVE "RETTANGOLO!" 


il programma RETTANGOLO! viene registrato 
sul disco inserito nell'ultima unità 
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selezionata o nell'unità 0 se nessuna 
unità era stata selezionata, in preceden- 


SAVE "0:RETTANGOLO!" 



SAVE "1 RETTANGOLO!" 



SAVE "VOLI ; RETTANGOLO! 1 



SAVE "VOLI:R!/PASS' 



RETTANGOLO! non ha password 


il programma RETTANGOLO! viene registrato 
sul disco inserito nella unità 0. 

RETTANGOLO! non ha password 


il programma RETTANGOLO! viene registrato 
sul disco inserito nella unità !. 

RETTANGOLO! non ha password 


il programma RETTANGOLO! viene registrato 
su VOL!, che può essere inserito in 
entrambe le unità (dato che l’utente ha 
specificato il nome del volume). 

RETTANGOLO! non ha password 


R! viene registrato su VOL!, che può 
essere inserito in entrambe le unità e 
assegna la password PASS al file R!. 


Sostituzione di un file 

Si suppone, negli esempi che seguono, che il volume sia abilitato e non 
sia protetto da scrittura. 


SE l'utente imposta... 

E SE... 

ALLORA... 

SAVE "FILE!" 

FILE! esiste già 

il programma residente 


sul disco seie- 

in memoria sostituirà la 


zionato 

versione precedente con 


E 

lo stesso 


non ha password 

-w 


W 
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SAVE "F1LE1/PASSI" 


F1LE1 esiste già 
sul disco sele¬ 
zionato 

E 

ha password PASSI 


il programma residente 
in memoria sostituirà le 
versione precedente con 
lo stesso nome e ha la 
stessa password 



FILEI esiste già 
sul disco sele¬ 
zionato 

E 

ha una password 
differente 


non avviene sostituzio¬ 
ne, e il sistema emette 
un messaggio d'errore 
(vedere Appendice F) 



F1LE1 esiste già 
sul disco sele¬ 
zionato 

E 

non ha password 


il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome, e l'at¬ 
tuale versione avrà la 
password PASSI 


Opzione A 

Se l'utente specifica l'opzione A, il file viene registrato in formato 
ASCII. 

Se egli, invece, non specifica l'opzione A (cioè nessuna opzione o 
l'opzione P), il file viene registrato in formato binario "compatto". 

11 formato ASCII occupa più spazio su disco che il formato "compatto", ma 
alcuni comandi richiedono che i file siano in formato ASCII, come ad 
esempio il comando MERGE. 


SE l'utente imposta... 


SAVE "GEOMETRY",A 


CR 


ALLORA... 


il programma GEOMETRY viene registrato in 
formato ASCII (cioè in una sequenza di 
caratteri ASCII) sul disco inserito nel¬ 
l'ultima unità selezionata o nell'unità 0 
se nessuna unità era stata selezionata in 
precedenza. 

GEOMETRY non ha password. 

Si suppone che il disco sia abilitato. 
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Opzione P 


Se l'utente specifica l'opzione P, il file non è soltanto registrato in 
formato binario "compatto", ma anche "protetto" contro ogni tentativo di: 

- listarlo 

- modificarlo 

- registrarlo di nuovo 


SE 


1'utente imposta... 


ALhORA... 


SAVE "0:GEODESY",P 


CR 


GEODESY viene registrato in formato bina¬ 
rio "compatto" e "protetto" sul disco 
inserito nella unità 0. 


GEODESY non ha password. Si suppone che il 
disco sia abilitato. 


TRASFERIMENTO DA DISCO A MEMORIA 


Se il programma che l'utente vuole portare in memoria, risiede su disco, 
l'utente deve impostare un comando LOAD. 

LOAD, nel trasferire un programma in memoria, ricopre qualsiasi altro 
programma ivi residente, perciò, prima di impostare un comando LOAD, 
l'utente dovrà provvedere a registrare su disco il programma attuale 
(supposto che non ne abbia già una copia). 

Per accedere a un programma su disco tramite un comando LOAD, il disco 
deve essere abilitato (altrimenti l’utente deve specificare la password). 
Per accedere ad un programma dotato di password, l'utente deve 
specificarne la password sempre tramite il comando LOAD. 

Se l'utente specifica l'opzione R tutti i file dati che erano stati 
aperti dal programma ricoperto rimangono aperti, inoltre il nuovo 
programma non solo viene trasferito in memoria ma viene anche eseguito 
(senza che l'utente debba impostare RUN). 
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LOAD (PROGRAMMA/IMMEDIATO)__ 

Trasferisce un programma da disco in memoria e ne lancia l'esecuzione (se 
l'utente specifica l'opzione R). 



Sintassi 2-9 Comando LOAD 

Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file identifier 


può essere sia una costante che una variabile 
stringa; specifica il file programma, che deve 
essere trasferito in memoria da disco 

R 


specifica che tutti i file dati aperti dal 
programma precedente vengano lasciati aperti e 
che il nuovo programma, dopo essere stato 
trasferito da disco in memoria, venga anche 
eseguito 


Esempi 


SE l'utente imposta... 


LOAD "0:RETTANGOLO!" 


CR 


ALLORA... 


il programma RETTANGOLO! viene tra¬ 
sferito in memoria dal disco montato 
nella unità 0. 


Si suppone che RETTANGOLO! non abbia 
password e che il disco sia abilitato 
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LQAD "VOLI : RETTANGOLO!/PI" 



il programma RETTANGOLA viene tra¬ 
sferito da disco a memoria. 

RETTANGQLQI ha come password PI e 
risiede sul disco VOLI che può essere 
inserito sia nella prima che nella 
seconda unità. 

Si suppone che VOLI sia abilitato. 


il prgramma FAA viene trasferito da 
disco a memoria. FAA risiede sul 
disco V3 che ha la password P3. 11 
disco V3 può essere inserito sia 
nella prima che nella seconda unità. 

11 comando LOAD, in questo caso, 
abilita anche il disco V3, dato che 
ne specifica la password. 

Si suppone che FAA non abbia pass¬ 
word. 


il programma, individuato dal conte¬ 
nuto della variabile B$, viene tra¬ 
sferito in memoria. 


Opzione R 

Se l'utente specifica l'opzione” R, tutti i file dati che erano stati 
aperti dal programma precedentemente eseguito restano aperti e viene 
anche lanciata l'esecuzione del nuovo programma trasferito da disco in 
memoria (senza che l'utente debba impostare il comando RUN). 

Se l'utente non specifica l’opzione R, il comando LOAD chiude tutti i 
file dati che erano stati aperti dal programma precedentemente eseguito. 

Si noti che: 

LOAD file identifier, R 

e RUN file identifier, R IWtM 

sono comandi equivalenti 
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SE l'utente imposta... 


LOAD "ACCOUNT",R 


CR 


ALLORA... 


il programma ACCOUNT viene trasferito in 
memoria da disco e viene eseguito; tutti i 
file che erano stati aperti dal programma 
precedente restano aperti. ACCOUNT risiede 
sull'unità selezionata per ultima, o sull'uni¬ 
tà 0 se nessuna unità era stata selezionata, 
in precedenza. 


ACCOUNT non ha password e il disco su cui 
risiede deve essere abilitato. 


ESECUZIONE DI UN PROGRAMMA 


Una volta che un programma è in memoria può essere eseguito. Per dire al 
sistema M20 di eseguire un programma, si deve impostare un comando RUN, 
(oppure un comando LOAD con l'opzione R). 

11 comando RUN esegue tutte le operazioni richieste dal, programma 
residente in memoria, o trasferisce un programma da disco e poi le 
esegue. Quando il comando RUN specifica il nome di un file programma, può 
includere: 

- una password di file, se il file ha una password 

- una password di volume, se il volume ha una password (e non è stato 
ancora abilitato) 

Se l'utente specifica l'opzione R, tutti i file dati che erano stati 
aperti dal programma precedente, restano aperti. 

Prima di impostare RUN file-identifier (oppure RUN file-identifier,R), 
l'utente deve registrare su disco il programma residente in memoria 
(ammesso che non ne abbia già una copia). 

Le istruzioni BASIC vengono eseguite seguendo la sequenza del numero di 
linea, a meno che un'istruzione di controllo (GOTO, ON...GOTO, 1F... 
GOTO...ELSE, 1F...THEN...ELSE, FOR/NEXT, WHILE/WEND) o il richiamo di un 
sottoprogramma (GOSUB, 0N...G0SUB), specifichi altrimenti. 
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RUN (PR0GRAMMA/1MMED1AT0) 


Lancia l'esecuzione del programma residente in memoria. Se il comando RUN 
specifica il nome di un programma su disco, questo viene trasferito in 
memoria ed eseguito. 



Sintassi 2-10 Comando RUN 

Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

line number 

specifica il numero di linea da dove inizia 
l'esecuzione del programma. Se l'utente non 
specifica questo numero il programma viene 
eseguito a partire dalla prima istruzione 

Nota: RUN line number e GOTO line number 
hanno la stessa funzione salvo il fatto che 
RUN ha anche la funzione di azzerare le 
variabili (cioè porre a zero le variabili 
numeriche e assegnare la stringa nulla alle 
variabili stringa) 

file identifier 

può essere sia una costante che una variabi¬ 
le stringa; specifica il file programma che 
deve essere trasferito in memoria da disco 
ed eseguito 

R 

questa opzione specifica che tutti i file 
dati aperti dal programma precedente esegui¬ 
to devono restare aperti. Se l'opzione non è 
specificata tutti i file dati vengono 
automaticamente chiusi prima di iniziare 
l'esecuzione del nuovo programma 
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Esempi . .....__ __ __ ________ 

Negli esempi seguenti si suppone che il disco selezionato sia abilitato 


SE l'utente imposta, 


ALLORA... 


RUN 


il programma residente in memoria viene 
eseguito 


RUN 150 


il programma residente in memoria viene 
eseguito a partire dalla istruzione 150 


RUN "1 :Newfile" 


il programma Newfile viene trasferito da 
disco in memoria ed eseguito. 11 pro¬ 
gramma risiede sul disco inserito nella 
unità 1. 

Si suppone che Newfile non abbia pass¬ 
word 


RUN "NewVOL:Newfile" 


il programma Newfile viene trasferito da 
disco a memoria ed eseguito. Newfile 
risiede sul disco NewVOL che può essere 
inserito nella prima o nella seconda 
unità. 

Si suppone che Newfile non abbia pass¬ 
word 


RUN "1 :Newfile/NewPASS" 


il programma Newfile viene trasferito da 
disco a memoria ed eseguito. 11 program¬ 
ma ha la password NewPASS e risiede sul 
disco inserito nella unità 1. 


RUN A$ 


Il programma specificato tramite il 
contenuto della variabile A$ viene 
trasferito da disco in memoria ed 
eseguito 
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Opzione R 


Se l'utente specifica l'opzione R nel comando RUN, tutti i file dati 
aperti dal programma eseguito in precedenza restano aperti. 

Se l'utente non specifica l'opzione R, tutti i file dati vengono chiusi 
prima di lanciare l'esecuzione del nuovo programma. 

Si noti che: 

RUN file identifier, R 

e 

LOAD file identifier, R fcdrfc 
sono comandi equivalenti 


ALLORA... 

il programma Newfile viene trasferito da disco 
a memoria ed eseguito. 1 file dati aperti dal 
programma eseguito in precedenza restano aper¬ 
ti. Newfile risiede sul disco inserito nella 
unità 1. 

Si suppone che Newfile non abbia password e che 
il disco sia abilitato. 


Se l'utente imposta... 


RUN "1:Newfile",R 
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Interruzione dell'Esecuzione 



l'utente imposta 


CTRL 


OPPURE 

viene eseguita una 
istruzione STOP 

OPPURE 

viene emesso un mes¬ 
saggio d'errore (ad 
esclusione di un er¬ 
rore sintattico) 


l'utente imposta 


CTRL 


ALLORA... 


si ha una interruzione e 1'M20 
entra in Stato Comandi. L'utente 
può riprendere l'esecuzione impo¬ 
stando il comando CONT (a meno che 
non avvenga un errore irrecuperabi¬ 
le o venga modificata qualche 
istruzione). 

Nessun file dati viene chiuso. 
L'utente può visualizzare i valori 
delle variabili (tramite l'istru¬ 
zione immediata PR1NT) o modificare 
i valori (tramite le istruzioni 
immediate LET) 


l'output su video viene sospeso. 
L'utente può far riprendere l'out¬ 
put su video premendo un tasto 
qualsiasi. 


una istruzione END viene 
eseguita 


1 file dati non vengono chiusi. 
L'utente non può visualizzare i 
valori delle variabili 


l'esecuzione del programma viene 
conclusa e l'M20 entra in Stato 
Comandi. Tutti i file dati vengono 
chiusi. 


L'utente può visualizzare i valori 
delle variabili (tramite l'istru¬ 
zione immediata PRINT) 
















3. AGGJORNAMENTO E MODIFICA DI UN 
PROGRAMMA 




SOMMARIO 


Anche un buon programmatore ha spesso necessità di correggere e modifica¬ 
re i propri programmi. Un programma può essere modificato in vari modi: 
cancellando linee, sostituendo linee, inserendo linee, rinumerando le 
linee, modificando parti di linea con 1'Editor. 

Questo capitolo illustra tutte queste possibilità facendo uso del 
programma RETTANG0L01. Verrà inoltre spiegato come rinominare un file, 
come cancellarlo su disco, come fare il MERGE di due programmi, come 
listare i nomi dei file di un disco. Si tenga presente che qualunque 
modifica a un programma, chiude tutti i file dati eventualmente ancora 
aperti, azzera le variabili numeriche e inizializza le variabili stringa 


col valore stringa nulla. 
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COME CANCELLARE LE LINEE 

3-1 

OELETE (IMMEDIATO) 
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COME CANCELLARE LE LINEE 


A scopo dimostrativo useremo un esempio chiamato RETTANG0L01 utilizzato 
nel capitolo 2. 

Se il programma RETTANG0L01 risiede in memoria, l'utente deve per prima 
cosa impostare un comando LIST. 


VIDEO 


LIST 

10 REM RETTANG0L01 
20 INPUT "Base";B 
30 1F B< =0 THEN 20 
40 INPUT "Altezza";H 
50 IF H < =0 THEN 40 
60 LET AR£A=B*H 

70 PRINT "Area=";AREA;" H=";B;’ 
80 GOTO 20 
90 END 
OK 


COMMENTI 


H=";H 


RETTANG0L01 ha due istruzioni 
di Input per introdurre da 
tastiera i valori di B e H. 
Conviene moficare il program- 
ma in modo da avere una sola 
istruzione di Input. Per 
prima cosa cancelliamo l'i¬ 
struzione 40. 


Se l'utente vuole cancellare la linea 40, deve impostare: 


SPACE 


CR 


oppure 


CR 


Per vedere il risultato di questo comando, l'utente deve impostare un 
altro comando LIST. 






VIDEO 


COMMENTI 


LIST 

10 REM RETTANGOLA 
20 INPUT "Base";B 
30 1F B< =0 THEN 20 
50 IF H< =0 THEN 40 
60 LET AREA=A*H 

70 PR1NT "Area=";AREA;" B=";B;" H=";H 
80 GOTO 20 
90 END 
OK 


In questa versione RETTANGOLO! 
non può essere eseguito. L'u¬ 
tente deve correggere sia 
l'istruzione 20 (che richiede 
di introdurre un solo valore), 
che l'istruzione 50 (che fa 
riferimento a un numero di 
linea che non esiste più). 
Correggeremo il nostro pro¬ 
gramma nelle pagine successi- 


DELETE (IMMEDIATO) 


Cancella le linee di programma. L'M20 ritorna in Stato Comandi dopo che è 
stato eseguito un comando DELETE. 
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Esempi 


SE l'utente imposta, 


ALLORA... 


DELETE . 


la linea attuale viene cancellata 


500 EQI 

oppure 
DELETE 500 K£] 


la linea 500 viene cancellata 


DELETE 100-200 


tutte le linee tra la 100 e la 200 comprese 
vengono cancellate 


DELETE -400 


tutte le linee dall'inizio del programma fino 
alla linea 400 compresa vengono cancellate. 


SOSTITUZIONE DI LINEE 

Per modificare una linea l'utente può: 

- sostutuire l'intera linea, impostando il numero di linea e il suo nuovo 
contenuto, oppure 


- modificare una parte di linea utilizzando 1'Editor di linea. 


Dapprima usiamo il primo metodo e sostituiamo la linea 20 e la linea 50 
del programma RETTANGOLOI, impostando: 


20 INPUT "Base e Altezza";B,H Uii 
50 1F H < =0 THEN 20 M9M 


e il programma sarà così listato: 















VIDEO 


COMMENTI 


LIST 

10 REM RETTANGOLOI 

20 INPUT "Base e Altezza";B,H 

30 1F B < =0 THEN 20 

50 IF H<=0 THEN 20 

60 LET AREA=B*H 

70 PR1NT "Area=";AREA;" B=";B;" 
80 GOTO 20 
90 END 
OK 


H=";H 


Questa versione di 
RETTANGOLOI è corretta. 
Comunque per terminare 
l'esecuzione, l'utente 
dovrà ancora impostare: 


Però non è pratico dover impostare MIWiNw B alla fine dell’esecuzione 
del programma, pertanto faremo alcune ulteriori modifiche. Possiamo 
sostituire alla linea 80, le seguenti due linee: 


1) INPUT "Ancora:$1=$,N0=N";X$ 

2) 1F X$="$" THEN 20 

Per sostituire l'istruzione GOTO alla linea 80, l'utente deve impostare: 
80 INPUT "Ancora : $1=$, N0=N;X$ K1 


Nota : X$ è una variabile stringa. 


INSERIMENTO DI LINEE 

Ora dobbiamo inserire l'istruzione 2) fra la linea 80 e la linea 90. 
Possiamo scegliere 85 come numero di linea e impostare: 

85 1F X0="S" THEN 20 M9M 

Ora impostiamo un. altro comando LIST: 
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VIDEO 


LIST 

10 REM RETTANGOLA 

20 INPUT "Base e Altezza";B,H 

30 IF B< =0 THEN 20 

50 1F H <=0 THEN 20 

60 LET AREA=B*H 

70 PRINT "Area=";AREA;" B=";B;" 
80 INPUT "Ancora:$I=$,NO=N";X$ 
85 IF X$="$" THEN 20 
90 END 
OK 


COMMENTI 


H=";H 


Questa versione di 
RETTANGOLO! non richie¬ 
de che l'utente imposti 
BÌMI |3i per arre¬ 
starne l'esecuzione. 
Però la sequenza dei 
numeri di linea non ha 
più un intervallo di 
10 . 


Quando l'utente lancia l'esecuzione del programma, ecco cosa succede: 
dopo aver calcolato l'area del rettangolo corrispondente ai valori 
introdotti della base e dell'altezza, il programma chiede all'utente se 
vuole continuare a introdurre altri valori. In caso affermativo, l'utente 
premerà S. L'istruzione 85 riporta allora il controllo all'istruzione 20 
e si ripete la sequenza di calcolo. In caso negativo, l'utente premerà N. 
L'istruzione 85 non riporta in tal caso il controllo all ’ istruzione 20, 
ma viene eseguita l'istruzione successiva che è un'istruzione END che 
arresta l'esecuzione del programma. 


COME RIMUNERARE LE LINEE 

Come abbiamo visto, l'attuale numerazione delle linee di RETTANGOLA non 
ha più un intervallo di 10. Ciò non ha importanza quando il programma è 
semplice, ma quando il programma è complesso e suscettibile di ulteriori 
modifiche, una numerazione delle linee casuale è sempre sconsigliabile. 

Il comando RENUM consente di rinumerare le linee di un programma, 
iniziando ad esempio con 10 e con un intervallo di 10 tra le linee. 
L'utente deve solo impostare: 


CR 


Per vedere il risultato, l'utente deve impostare un altro comando LIST. 
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LIST 

10 REM RETTANG0L01 

20 INPUT "Base e Altezza"; B,H 

30 IF B< =0 THEN 20 

40 1F H<=0 THEN 20 

50 LET AREA=B*H 

60 PR1NT "Area=";AREA" B=";B" H=;H 
70 INPUT "Ancora:$!=$,NO=N";X$ 

-80 1F X$="$" THEN 20 
90 END 
OK 


MODIFICA AUTOMATICA DEI NUMERI DI LINEA RIFERITI 

Quando un programma viene rinumerato tramite il comando RENUM, tutti i 
numeri di linea riferiti all'interno del programma vengono aggiornati in 
modo automatico. Per es., se un programma contiene l'istruzione GOTO 140 
e la linea 140 viene rinumerata, il riferimento a questa linea 
nell'istruzione GOTO sarà aggiornato in modo automatico. 


Regola Generale 

11 comando RENUM modifica tutti i numeri di linea riferiti dopo GOTO, 
GOSUB, THEN, ELSE, 0N...G0TQ, 0N...G0SUB e ERL, correntemente alla nuova 
numerazione delle linee. 

Se in un programma si fa riferimento a linee non esistenti, il comando 
Renum fa comparire il messaggio seguente: 

Undefine line XXXXX in YYYYY. 

Il programma sarà rinumerato correttamente e i riferimenti a linee non 
esistenti rimarranno immutati. 

RENUM (IMMEDIATO) 

Modifica i numeri di linea del programma residente in memoria. 
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Sintassi 3-2 Comando RENUM 


Dove 


ELEMENTO DI SINTASSi 

SIGNIFICATO 

VALORI DI DEFAULT 

new line number 

è il primo numero 
di linea della nuo¬ 
va numerazione 

10 

old line number 

è il primo numero 
di linea della pre¬ 
cedente numerazione 

se omesso corrispon¬ 
de alla prima linea 
del programma 

interval 

è il nuovo interval¬ 
lo tra i numeri 
di linea 

10 


Esempi 


SE l'utente imposta. 


ALLORA.. 


RENUM 


l'intero programma viene rinumerato. 11 primo 
numero di linea nella new line number è 10 e 
viene assunto un intervallo di 10 (valori di 
default) 


RENUM 100 


L'intero programma viene rinumerato. Il primo 
numero di linea è 100 e viene assunto un 
intervallo di 10 (valore di default). 
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RENUM 150,,20 


CR 


L'intero programma viene rinumerato. 11 primo 
numero di linea è 150 e viene assunto un 
intervallo di 20 


MODIFICA DI LINEE CON L'EDITOR DI LINEA 

I 

In Stato Editor è possibile modificare parti di una linea, senza dover 
rimpostare l'intera linea. 

L’M20 entra in Stato Editor di linea se: 


- l'utente imposta un comando ED1T, oppure 

- viene riscontrato un errore di sintassi. 


Dopo essere entrato in Stato Editor, l'M20 visualizza il numero della 
linea da modificare (che è seguito da uno spazio) e resta in attesa che 
l'utente imposti un comando dell'Editor. Questi comandi non vengono 
visualizzati quando l'utente li introduce, infatti, in Stato Editor, 
l'M20 interpreta i caratteri introdotti di volta in volta che l'utente li 
imposta, senza aspettare che l'utente prema EQ|- 


ED1T (IMMEDIATO) 

Il comando ED1T fa si che 1 ’M20 entri in Stato Editor alla linea 
specificata. 



Sintassi 3-3 Comando EDIT 
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Esempi 


SE l'utente imposta, 


ALLORA l'M20 visualizza.. 


EDIT . 


nn...n (entrando in Stato Editor alla linea 
attuale) In questo caso nn...n indica il 
numero della linea attuale 


EDIT 300 


300 (entrando in Stato Editor alla linea 
specificata (quindi alla 300)) 


COMANDI DELL 1 EDITOR 

La seguente tabella illustra i comandi dell'Editor che vengono raggrup 
pati in classi. 


CLASSE 

COMANDO 

SIGNIFICATO 

inizio modifiche 

Ul (Lista) 

visualizza lo stato 
attuale della linea. 
Il numero della li¬ 
nea attuale viene 
visualizzato al- 
1 'inizio della linea 
successiva. 


U (Again-Ancora) 

ripristina la linea 
originaria senza vi¬ 
sualizzarla. Il num¬ 
ero della linea at¬ 
tuale viene di nuovo 
visualizzato al¬ 

l'inizio della linea 
successiva. 

spostamento cursore 

npAcÈ^HHHH 

visualizza il carat¬ 
tere successivo e 
sposta il cursore a 
destra di una posi¬ 
zione. 
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Cancella il caratte¬ 
re attuale e sposta 
il cursore a sini¬ 
stra di una posizio- 


entra in Stato Inse¬ 
rimento all'attuale 
posizione del curso¬ 
re. L'utente può 
inserire una stringa 
di caratteri e i 
caratteri inseriti 
vengono visualizza¬ 
ti. Per uscire dallo 
Stato Inserimento, 
l'utente deve impo¬ 
stare Mìf«lyia 


visualizza l'ultima 
parte della linea, 
sposta il cursore 
alla fine della li¬ 
nea e entra in Stato 
Inserimento 


esce dallo Stato 
Inserimento, ma ri¬ 
mane in Stato Edi¬ 
tor. Se l'utente 
preme 1301, esce sia 
dallo Stato Inseri¬ 
mento che dallo Sta¬ 
to Editor 


cancella il caratte¬ 
re successivo che 
viene visualizzato 
tra due barre rove¬ 
sce ( \ ) e il curso¬ 
re viene posizionato 
alla sua destra 
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121 H>| (Delete- 
Cancella n caratteri) 


cancella i succes¬ 
sivi caratteri. I 
caratteri cancellati 
sono visualizzati 
tra due barre rove¬ 
sce ( \ ) ; il cursore 
viene posizionato 
alla destra del¬ 
l'ultimo carattere 
cancellato. 





Se la linea ha meno 
di n caratteri alla 
destra del cursore, 
D HHH cancella 
l'ultima parte della 
linea 



ili (Hack-Tronca) 


cancella l'ultima 
parte della linea e 
entra in Stato Inse¬ 
rimento 

ricerca caratteri 


B B (Search- 
Ricerca la prima 
occorrenza di x) 


ricerca la prima 
occorrenza di "x" 
nella linea (dove 
"x" è un qualsiasi 
carattere stampabile 
ASCII) e posiziona 
il cursore subito 
prima di questo ca¬ 
rattere. 11 caratte¬ 
re alla posizione 
attuale del cursore 
non viene incluso 
nella ricerca. Se il 
carattere non viene 
trovato nella linea, 
il cursore viene 
portato a fine linea 
e tutti i caratteri 
esaminati durante la 
ricerca vengono vi¬ 
sualizzati . 

1 










SU KB a (Search- 
Ricerca l'n-esima 
occorrenza di x) 


Itfl SS (Delete- 
Cancella fino alla 
1~ occorrenza di x) 


ElOn (Delete- 
Cancella fino al- 
l'n-esima occorrenza di 
X) 



jBB SS (Cambia 
un carattere) 


(Cambia una stringa 
di n caratteri) 


ha la stessa funzio¬ 
ne del comando pre¬ 
cedente, ma ricerca 
l'n-esima occorrenza 
anziché la prima. 


ha una funzione si¬ 
mile al comando Wl 
SS. ad esclusione 
del fatto che tutti 
i caratteri esamina¬ 
ti durante la ricer¬ 
ca vengono cancella¬ 
ti. Il cursore viene 
posizionato subito 
prima di "x" e i 
caratteri cancellati 
vengono racchiusi 
tra due barre rove¬ 
sce ( \ ). 


ha la stessa funzio¬ 
ne del comando pre¬ 
cedente, ma ricerca 
l'n-esima occorren¬ 
za, anziché la pri- 


cambia in "x" il 
carattere successivo 
a quello della posi¬ 
zione del cursore. 

cambia i successivi 
n caratteri nella 
stringa specificata 
(cioè impostata dopo 
19). Quando l'uten¬ 
te ha impostato una 
stringa di n carat¬ 
teri, l’M20 ritorna 
in Stato Editor 
uscendo dallo Stato 
Sostituzione carat¬ 
teri . 
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uscita dall'Editor 


CR 


Bi (Exit-Uscita) 


(Quit-Uscita 
con ripristino) 


visualizza la linee 
modificata e ritorna 
allo Stato Comandi 


ha la stessa funzio- 
ne di ma 
l’ultima parte della 
linea non viene vi¬ 
sualizzata. 


torna allo Stato 
Comandi e cancella 
tutti i cambiamenti 
fatti alla linea. 


Esempi 

La seguente tabella fornisce alcuni esempi di uso dei comandi dell'Edi¬ 
tor . 


SE l'utente imposta... 


ALLORA 1'M20 visualizza. 


SPACE 


500 


500 FOR 1=1 TO 15 STEP 2 
500 


3 

4 

5 

6 
7 


SPACE 


(6 volte) 


500 FOR 1= 


500 FOR 1=2 


SPACE 


(5 volte) 


500 FOR 1=2 TO 1 


500 FOR 1=2 TO 16 


500 FOR 1=2 TO 16 STEP 2 
OK 


SPACE 


510 


> 
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510 LET A(I)=1*S1N(X) 
510 


3 

4 

5 


SPACE 


(11 volte) 


510 LET A(I)=I* 


510 LET A(I)=1*C0S 


!■ ■ * 


SPACE 


510 LET A(1)=1*C0S(X):PRINT A(l) 
OK 


1 

2 

3 

4 

5 

6 


SPACE 


510 


510 \ LET \ 


SPACE 


(12 volte) 


510 \ LET \A(1)=1*C0S( 


CTRL I HOME 


510 \ LET \ A(I)=1*C0S(Y+ 


SPACE 


(9 volte) 


510 \ LET \ A(I)=I*C0S(Y+X):PRINT 


510 \ LET \ A(1)=1*C0S(Y+X) 
PRINT 1,X ; 

OK 


5PACE 


510 A(1)=1*C0S(Y+X):PR1NT 1,X; 
OK 


ESAME DEI VALORI ATTUALI DELLE VARIABILI 

Quando l'utente modifica una linea di programma tramite l'Editor di 
linea, tutte le variabili numeriche vengono azzerate e le variabili 
stringa vengono inizializzati con il valore "stringa nulla" (""). Inoltre 
vengono chiusi tutti i file dati. Se il BASIC rivela un errore sintattico 
durante l’esecuzione di un programma, passa automaticamente in Stato 
Editor. Prima di modificare una linea, l'utente potrebbe aver la 
necessità di sapere i valori attuali delle variabili. In questo caso 
dovrà premere il tasto K9, come primo comando di Editor. Questo comando 
fa passare dallo Stato Editor allo Stato Comandi, dove è possibile 
esaminare i valori delle variabili. Qualsiasi altro comando di Editor 
(premendo il tasto oppure ecc.) azzererà tutte le variabili 
numeriche e inizializzerà tutte le variabili stringa con il valore 
"stringa nulla" (""), rendendo perciò impossibile l'esame dei valori 
delle variabili. 
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COTE RINOMINARE UN FILE 


L'utente può cambiare il nome di un file programma o di un file dati 
residenti su disco tramite il comando NAME, purché il disco o il file non 
siano protetti da scrittura. 11 volume selezionato deve includere il nome 
da sostituire, e non il nuovo nome del file. Dopo che un comando NAME è 
stato eseguito, il file continua a esistere sullo stesso disco e nella 
stessa area di disco, ma ha il nuovo nome. Le password di file e di 
volume (se esistevano), non vengono 'modificate. L'utente deve in tal caso 
specificare la password di file e il volume deve essere abilitato 
(altrimenti l'utente deve specificare anche la password di volume). 


NAME (PROGRAMMA/1MMED1AT0) 

Cambia il nome di un file su disco. 



<i> 


\ , 

file 


) * 

name 



Sintassi 3-4 Comando NAME 

Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file identifier 


Può essere una costante o una variabile stringa 
e specifica il file programma o dati il cui nome 
deve essere modificato 

file name 


Può essere una costante o una variabile stringa 
e specifica il nuovo nome del file 


Esempi 

Si suppone che nè il volume nè il file siano protetti da scrittura e che 
il volume sia abilitato. 
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SE l'utente imposta... 


ALLORA... 


il nome di file FRI viene cambiato in FR2. li 
file risiede sul disco inserito nella unità 1. 
FRI non ha password. 

11 nome di file ACC viene cambiato in ACCI. 11 
file risiede sul disco VOLI che può essere 
inserito sia nella prima che nella seconda 
unità. La password del file resta PACC. 


COME CANCELLARE UN FILE 

Tramite il comando KILL l'utente può facilmente cancellare i file 
programma oppure i file dati registrati su disco, purché il disco non sia 
protetto da scrittura. Il nome di un file che è stato cancellato, può 
essere riutilizzato per identificare un nuovo file. 

L'utente deve specificare la password del file (se esiste), e il volume 
deve essere abilitato (altrimenti l'utente deve specificarne la 
password). 


KILL (PROGRAMMA/IMMEDIATO) 

Cancella un file programma o un file dati registrati su disco. 



Sintassi 3-5 Comando KILL 


NAME "1:FR1" AS "FR2" 


NAME "VOLI:ACC/PACC" 

as "acci" rea 
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Dove 


File identifier può essere una costante o una variabile stringa e 
specifica il file da cancellare. 


Esempi 

Si suppone che il volume non sia protetto da scrittura e che sia 
abilitato. 


SE l'utente imposta... 


K1LL "Business.B" 


CR 


K1LL "1:Business.B" 


CR 


K1LL "NUMbers/PNUM01" 


CR 


ALLORA... 


il file Business.B viene cancellato. Esso 
risiede sull'unità selezionata per ultima, o 
sull'unità 0 se nessuna unità è stata seleziona¬ 
ta in precedenza. 11 file non ha password. 


il file Business.B viene cancellato. Esso 
risiede sul disco inserito nella unità 1. 11 
file non ha password. 


il file Numbers con password PNUM01 viene 
cancellato. Esso risiede sull'unità selezionata 
per ultima, o sull'unità 0 se nessuna unità è 
stata selezionata in precedenza. 


COME FARE IL MERGE DI DUE PROGRAMMI 


Il comando MERGE permette di inserire nel programma in memoria un altro 
programma residente su disco in formato ASCII, in modo da ottenere un 
unico programma. 11 comando MERGE ha una funzione simile al comando LOAD, 
ma il programma residente in memoria non viene cancellato al momento del 
trasferimento in memoria del programma su disco. L'operazione di MERGE 
comporta che le linee del programma su disco vengano inserite (secondo la 
sequenza del numero di linea) nel programma residente in memoria. Se, in 
questo processo di inserimento, due linee hanno lo stesso numero di 
linee, la linea del programma su disco sostituisce quella in memoria. 11 
comando MERGE deve specificare la password di file, se il programma su 
disco ha una password e il disco deve essere abilitato (o l'utente deve 
specificarne la password). 
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L'operazione di MERGE può ad esempio essere utile per inglobare subrou- 
. tine standard in un programma. 

E' buona norma di programmazione fare l'operazione di MERGE tra subrou¬ 
tine con numeri di linea alti (per esempio da 10000 in su) al fine di 
ridurre il tempo dell'operazione di MERGE e di lasciare la possibilità di 
estendere, eventualmente, il programma principale. 


MERGE (PROGRAMMA/IMMEDIATO) 

Esegue 1 operazione di MERGE tra il programma in memoria e il programma 
registrato su disco (in formato ASCII). 




\ , 

file 


ì * 

identifier 



Sintassi 3-6 Comando MERGE 

Dove 

Il file identifier può essere una costante o una variabile stringa e 
specifica un file programma in formato ASCII, cioè registrato con 
1'opzione A. 


Esempi 


VIDEO 


MERGE "1:Fnew/FnewPASS 


CR 


si fa il MERGE tra il 
password FnewPASS e il 


COMMENTI 


programma Fnew con la 
programma in memoria. 


Nota : 11 disco è inserito nella unità 1 ed è 
abilitato. 


► 
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MERGE "V001/VP001 

P001" e a 


F001 / 


si fa il MERGE tra il programma F001 con la 
password P001 e il programma in memoria. 


Nota : In questo caso il disco V001 viene 
abilitato dal comando MERGE con l'uso della 
password VP001. 


Nota 

MERGE chiude tutti i file dati eventualmente aperti dal programma 
residente in memoria e no* ancora chiusi, azzera le variabili numeriche e 
inizializza le variabili stringa col valore stringa nulla. 


COME LISTARE 1 NOMI DEI FILE REGISTRATI SU DISCO 


Se l'utente non ricorda i nomi dei file programma e/o dati registrati su 
disco, può usare il comando F1LES. 

Questo comando può essere usato sia specificando un identificatore di 
volume che un identificatore di file. 

Quando l'utente specifica un identificatore di volume, tutti i file 
registrati su quel disco vengono listati (sia che abbiano o no una 
password). 

Per eseguire un comando F1LES non è necessario nè conoscere la password 
di volume nè che il disco venga abilitato. 

Quando l'utente specifica invece un identificatore di file, soltanto 
questo file viene listato e l'utente può anche non specificarne la 
password (se esiste). 

La stessa funzione svolta dal comando FILES può essere realizzata in PCOS 
tramite i comandi vlist e flist. 

Nota : 11 comando FILES non lista la password. 

11 comando FILES permette di visualizzare: 

- l'unità disco, dove il disco stesso è inserito. 
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- il nome del disco 











- il nome e l'estensione (in byte), i settori utilizzati, i settori 
allocati, gli extent usati, la condizione di password e/o di protezione 
da scrittura di ogni file su disco, oppure del file specificato. 


- lo spazio occupato su disco (in settori) 

- lo spazio libero su disco in settori (dove un settore è pari a 256 
byte). 


FILES (PR0GRAMMA/1MMEDIATO) 


Lista i file registrati sul disco specificato. 



Sintassi 3-7 Comando F1LE5 


Dove 


ELEMENTO DI SINTASSI 

- 

SIGNIFICATO 

volume identifier 


può essere una costante o una variabile stringa 
is specifica il disco di cui si richiede di 
listare i file 

file identifier 


può essere una costante o una variabile stringa 
e specifica il file di cui si richiede di 
visualizzare il nome e l'estensione (in byte) 


3-20 


LINGUAGGIO BASIC - MANUALE GENERALE 









AGGIORNAMENTO_E MODIFICA DI_UN PROGRAMMA 


Esempi 


SE l'utente imposta, 


ALLORA... 


F1LES 


viene visualizzata la "directory" dell'ultima 
unità selezionata o dell'unità 0 se nessuna 
unità è stata selezionata in precedenza. 


F1LES "0:" 


viene visualizzata la "directory" del disco 
inserito nella unità 0. 


F1LES "1:" 


viene visualizzata la "directory" del disco 
inserito nella unità 1. 


F1LES "MYVOL:" 


viene visualizzata la "directory" del disco 
MYVOL. Esso può essere inserito sia nella prima 
che nella seconda unità. 


F1LES "MYVOL/MYPASS:" 


viene visualizzata la "directory" del disco 
MYVOL che ha la PASSWORD MYPASS. Esso può essere 
inserito sia nella prima che nella seconda 
unità. Specificare la password di volume non 
influenza l'esecuzione di questo comando. 


F1LES "MYF1LE" 


viene visualizzata la descrizione del file 
MYF1LE, che è residente sul disco, inserito 
nell'ultima unità selezionata o nell'unità 0 se 
nessuna unità è stata selezionata in precedenza. 
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I DATI 


COSTANTI E VARIABILI 


1 dati che un programma BASIC può prendere in considerazione, possono 
essere delle costanti o delle variabili. 


COSTANTI 

Se in un'istruzione BASIC compare un numero (ad es. 15, -2, 3.41 ecc.), o 
una stringa di caratteri (ad es. "AAA.bl", "Cursor***"), questo numero o 
questa stringa sono considerati costanti. Ciò significa che i loro valori 
non variano durante l'esecuzione del programma. 


VARIABILI 

Una variabile è un dato al quale è stato associato un nome. 11 valore del 
dato può quindi cambiare durante l'esecuzione del programma. 

Per es., la formula che calcola l'area di un cerchio: 

3.141592*R A 2 

utilizza la variabile R, che rappresenta qualsiasi valore del raggio, e 
riserva una posizione di memoria per questo valore. 

Nota : 11 simbolo A è un operatore che indica che R deve essere elevato 
alla potenza specificata (nel nostro caso 2). 


NOMI DELLE VARIABILI 

L'identificatore (o nome) di una variabile può essere di qualsiasi 
lunghezza, ma soltanto i primi 40 caratteri sono significativi. 1 
caratteri ammessi possono essere lettere e numeri. 11 punto (.) è pure 
ammesso. Il primo carattere deve essere una lettera, e l'ultimo può 
essere sia una lettera, sia un numero, sia un punto, sia un carattere di 
dichiarazione di tipo (%,!,#,$). Il significato di un carattere di 
dichiarazione di tipo verrà spiegato più avanti in questo stesso 
capitolo. 

Le lettere minuscole, eventualmente presenti in un identificatore di 
variabile, sono considerate equivalenti alle corrispondenti lettere 
maiuscole e vengono convertite in lettere maiuscole quando si lista il 
programma. 

Esempi di nome di variabile sono: _ 

STUDENTE Al CC01.CLASSE ACCONTO# A$ STRINGA 
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Parole Riservate 


Una parola riservata (una parola chiave, il nome di un comando o di una 
funzione) non può essere usata come identificatore di una variabile, ma 
il BASIC consente di inserire parole riservate aH'interno, all’inizio o 
alla fine di un identificatore di variabile. Per es.: 

10 PERFORMACE = 105.3 
20 SINGLE = 1371.2 

sono linee di programma corrette, anche se PERFORMANCE contiene la parola 
chiave FOR, e SINGLE inizia con il nome della funzione SIN. 


RAPPRESENTAZIONE DEI NUMERI 

L uomo e abituato a pensare i numeri in base 10 (rappresentazione 
decimale). Viceversa un computer considera i numeri come stringhe di bit 
(dove ogni bit può avere il valore 0 oppure 1), ed esegue la maggior 
parte delle sue operazioni trattando i numeri in base 2 (rappresentazione 
binaria). 

Questo paragrafo traccia una panoramica dei concetti di base della 
rappresentazione dei numeri in base 2, in base 16 e in base 8. 


RAPPRESENTAZIONE BINARIA 

Prima di parlare della rappresentazione binaria, esaminiamo brevemente la 
struttura della rappresentazione decimale. La rappresentazione decimale 
usa le cifre 0,1,2,...9. Ad esempio, prendiamo in considerazione il 
numero: 

205 

Vediamo che le sue cifre hanno un valore di posizione associato alla 
potenza del 10. Infatti questo numero può essere pensato come: 

2 x 10 2 + 0 x 10 1 + 5 x 10 0 

Il concetto di valore di posizione esiste anche nella rappresentazione 
binaria. L'unica differenza è che vengono prese in considerazione le 
potenze del 2, anziché quelle del 10. Il numero 205 in base 2 è: 
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11001101 

Si noti che in base 2, le cifre ammesse sono soltanto "1" e "0". Quindi 
la predetta rappresentazione binaria significa: 

1x2^ + 1x2^ +0x2 +0x2 +1x2 +1x2 +0x2 +1x2 


cioè: 

128+64+8+4+1 =205 

Byte 

Le stringhe di bit vengono solitamente suddivise in gruppi di 8 bit. Un 
gruppo di 8 bit, considerato come una singola unità di informazione, 
viene denominato "byte". 

1 bit di un byte sono numerati da 0 (il primo a destra, cioè il meno 
significativo) a 7 (il primo a sinistra, cioè il più significativo). 

In base a questa convezione, il numero del bit e la potenza del 2 che 
rappresenta sono identici. La seguente tabella fa vedere il numero di 
posizione di un bit nell'ambito del byte e il suo valore corrispondente. 


NUMERO DI POSIZIONE 

7 

6 

5 

■ 

3 

2 

i 

0 

Significato 

2 7 

2 6 

2 5 

2 4 

2 3 

2 2 

2 1 

0 

2 

Valore 

128 

64 

32 

16 

8 

n 

2 

1 


Esempi 


BASE 10 

BASE 2 

0 

0 

12 

1100 

27 

11011 

149 

10010101 

255 

11111111 
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Word 


L'M20 elabora 16 bit (2 byte) per volta. Questa quantità è detta "word", 
11 numero di bit in una word può variare da macchina a macchina. I bit di 
una word sono numerati da 0 (quello più a destra, cioè il meno 
significativo) a 15 (quello più a sinistra, cioè il più significativo). 

Un altra caratteristica di una word nel sistema M20 è che viene usata la 
rappresentazione "complemento a due". Questa rappresentazione consente di 
memorizzare in una word sia numeri positivi che negativi: 


SE un numero intero è... 

ALLORA... 

E la word è... 

positivo 

il bit 15 è 0 

un numero positivo rap¬ 
presentato in binario 

negativo 

il bit 15 è 1 : 

1 

un numero negativo rap¬ 
presentato in "comple¬ 
mento a due". 


Per trovare il valore assoluto di un numero negativo, bisogna invertire 
tutti i suoi bit e aggiungere 1. 


Per esempio: 


1111100110011000 valore originario (negativo) 
Invertendo tutti i bit 


0000011001100111 valore invertito 

Aggiungendo 1 

0000011001101000 valore assoluto (valore invertito + 1) 

Sicché il valore della configurazione di bit sopra specificata è: 
-1640 
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RAPPRESENTAZIONE ESADECIMALE E OTTALE 

Abbiamo visto che è possibile rappresentare: numeri in base 10 (rappre¬ 
sentazione decimale) e in base 2 (rappresentazione binaria). IL BASIC 
permette anche di rappresentare: numeri in base 8 (rappresentazione 
ottale) e in base 16 (rappresentazione esadecimale). 

Sebbene sia spesso conveniente trattare i numeri in base 2, è difficile 
per l'utente scriverli e leggerli in questa rappresentazione. Per questa 
ragione l'utente preferisce convertirli in base otto o in base sedici. 

- Base 8, conosciuta come "rappresentazione ottale", usa una cifra ottale 
per tre cifre binarie 

- Base 16, conosciuta come "rappresentazione esadecimale", usa una cifra 
esadecimale per 4 cifre binarie. 

La seguente tabella illustra la rappresentazione in base 10 (decimale), 
in base 2 (binaria), in base 8 (ottale), e in base 16 (esadecimale) dei 
numeri da 0 a 16. 


DECIMALE 

BINARIA 

OTTALE 

DECIMALE 

BINARIA 

ESADECIMALE 

0 

000 

0 

0 

0000 

0 

1 

001 

1 

1 

0001 

1 

2 

010 

2 

2 

0010 

2 

3 

011 

3 

3 

0011 

3 

4 

100 

4 

4 

0100 

4 

5 

101 

5 

5 

0101 

5 

6 

110 

6 

6 

0110 

6 

7 

111 

7 

7 

0111 

7 

8 

1000 

10 

8 

1000 

8 

9 

1001 

11 

9 

1001 

9 

10 

1010 

12 

10 

1010 

A 

11 

1011 

13 

11 

1011 

B 

12 

1100 

14 

12 

1100 

C 

13 

1101 

15 

13 

1101 

D 

14 

1110 

16 

14 

1110 

E ■ 

15 

1111 

17 

15 

1111 

F 

16 

10000 

20 

16 

10000 

10 
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CLASSIFICAZIONE DELLE COSTANTI 


11 modo in cui il BASIC memorizza un dato determina: 

- lo spazio in memoria che il dato occupa (in byte) 

- la velocità con cui il BASIC elabora il dato. 


DATI NUMERICI 

L'utente può far si che il BASIC memorizzi i numeri del proprio programma 
come: 

- numeri interi (massima velocità di elaborazione ma limitato campo di 
definizione) 

- numeri in semplice precisione (di uso generale) 

- numeri in doppia precisione (massima precisione ma elaborazione più 
lenta). 



NUMERI 

INTERI 

NUMERI IN 

SEMPLICE 

PRECISIONE 

NUMERI IN 

DOPPIA 

PRECISIONE 

Spazio in 
memoria 
(in byte) 

2 

4 

8 

Campo di 
definizione 

Da -32768 
a 32767 

Da 

a + 10 

0. ♦ ifi* 8 

a ♦ 10 308 

Cifre signi¬ 
ficative 

Massimo 5 

Massimo 7 

Massimo 16 

Cifre visua¬ 
lizzate 

(PRINT/LPRINT) 

Massimo 5 

Massimo 6 
(con arroton¬ 
damento) 

Massimo 15 
(con ar¬ 

rotonda¬ 
mento) 
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Nota : Gli zero non significativi non vengono visualizzati. Per esempio il 
valore 3.410000 in semplice precisione verrà visualizzato come 3.41. 


DATI STRINGA 

Le stringhe (sequenze di caratteri ASCII) sono utilizzate per memorizzare 
informazioni non numeriche, come nomi, indirizzi, codici,ecc. Per esempio 
la costante: 

"FORD , RENAULT" 

è una costante stringa di 13 caratteri. Ogni carattere della stringa 
(compreso lo spazio) è memorizzato in un byte e corrisponde a un codice 
della tabella ASCII. 11 BASIC memorizza la suddetta costante stringa come 
segue: 


Carattere 

ASCII 

F 

0 

R 

D 

, R 

E 


H 

U 

L 

T 

Codice 

Esadecimale 

46 

4F 

52 

44 

20 ' 2C 52 

45 

4E 

41 

55 

4C 

54 


La lunghezza massima di una stringa è di 255 caratteri. Una stringa con 
lunghezza zero è detta stringa "nulla", ed è rappresèntata da una coppia 
di virgolette (""). 11 BASIC memorizza le stringhe in modo dinamico, cioè 
lo spazio in memoria riservato ad una stringa può variare durante 
l'esecuzione del programma da 0 a 255 byte. 


STRINGA NULLA 

STRINGA DI 
n CARATTERI 

STRINGA DI MAS¬ 
SIMA LUNGHEZZA 

Spazio in memoria 0 

(in byte) 

n 

255 

Campo di 
definizione 

Qualsiasi stringa di caratteri 

stampabili ASCII, spazio compreso 
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DETERMINAZIONE DEL TIPO DI UNA COSTANTE 


SE... 

ALLORA... 

ESEMPI 

il valore è compre¬ 
so tra due virgolette 

è una stringa 

"NO" 

"YES" 

"Circle" 

""(stringa nulla) 

il valore non è 
compreso tra due 

è un numero 

521 

-15 

virgolette 

Nota: Un'eccezione a 
questa regola si ha 
quando l'operato¬ 
re introduce un dato 
in risposta a una 
istruzione di INPUT o 
LINE INPUT, e nelle 
istruzioni DATA 

3.7345E-2 

43# 

un numero è intero 

è una costante 


ed è compreso tra 
-32768 e 32767 

intera 

721 

-32768 

il valore ha il 

è una costante 


prefisso &H, ed è 
composto dai nume¬ 
ri da 0 a 9 e dalle 
lettere da A a F 
(compreso tra 0 e 

FFFF ) 

esadecimale 

&HF1 

&H35 ■ 

&HFE98 

&HFFFF 

&H0 

il valore ha il 

è una costante 


prefisso &0 o & ed 
è composto dai nu¬ 
meri da 0 a 7 (com¬ 
preso tra 0 e 177777) 

ottale 

&044 

&71175 

un numero non è 

è una costante in 

-2.3 

un numero intero 
e non contiene più 
di 7 cifre 

semplice precisione 

32768 

45.314 

-65000 

un numero contie- 

è una costante in 

52174593 

ne più di 7 cifre 

doppia precisione 

-54.397124 

8.799999999 
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CARATTERI 01 DICHIARAZIONE TIPO 

L'utente può forzare il tipo di una costante aggiungendo alla fine di una 
costante numerica i seguenti caratteri di dichiarazione: 


CARATTERI DI 
DICHIARAZIONE 

SIGNIFICATO 

ESEMPI 

! 

dichiara un numero 
in semplice pre¬ 
cisione 

5.72110333! 

la costante è in 
semplice precisione e 
solo le prime 7 cifre 
(per es. 5.721103) 
vengono memorizzate. 

E 

semplice precisione 
"floating point". E 
indica che la co¬ 
stante deve essere 
moltiplicata per una 
potenza del 10, in¬ 
dicata dopo la E 

7.31E4 significa 

7.31X10^cioè 

73100 

# 

dichiara un numero 
in doppia precisione 

4# 

5.21# 

D 

doppia precisione 
"floating point". D 
indica che la co¬ 
stante deve essere 
moltiplicata per una 
potenza del 10, in¬ 
dicata dopo la D 

7.2D-3 significa 

-3 . s 

7.2 x 10 cioè 

0.0072 
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CLASSIFICAZIONE DELLE VARIABILI 

Ogni identificatore di variabile che appare in un programma BASIC, 
classificato o come una stringa, o come un numero intero, o come un 
numero in semplice o doppia precisione. 

Se non viene specificato altrimenti, il BASIC classifica tutte le 
variabili numeriche in semplice precisione. Per esempio, se questa è la 
prima linea del nostro programma: 

10 XI=3.5 

11 BASIC classifica XI come una variabile in semplice precisione. 

Tuttavia, l'utente può attribuire tipi diversi alle variabili sia usando 
istruzioni di definizione di tipo sia scrivendo un carattere particolare, 
atto a dichiarare il tipo, alla fine dell'identificatore di variabile. 

DEFINT/DEFSNG/DEFDBL/DEFSTR (PROGRAMMA/1MMEDIATO) 

Esistono in BASIC quattro istruzioni di definizione di tipo. 

Un'istruzione di definizione di tipo dichiara il tipo di tutte le 
variabili il cui nome inizia con una lettera ben specificata. 

Queste istruzioni vengono inserite di solito all'inizio del programma e 
devono precedere l'uso delle variabili di cui definiscono il tipo. 



Sintassi 4-1 Istruzioni di Definizione di Tipo 
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Valori di Difetto - - 

Se non specificato altrimenti, tutte le variabili vengono assunte in 
semplice precisione. 

Eseapi 


SE l'utente imposta. 


ALLORA... 


10 DEF1NT A-Z 


tutte le variabili del programma saranno numeri 
interi 


10 DEFDBL D 


tutte le variabili del programma che iniziano 
con la lettera D saranno in doppia precisione 


10 DEFSTR S.U-W 


tutte le variabili del programma che iniziano 
con le lettere S, U, V e W saranno variabili 
stringa 


CARATTERI DI DICHIARAZIONE DI TIPO 

Come già abbiamo visto per le costanti, l'utente può forzare il tipo di 
una variabile aggiungendone alla fine del nome caratteri di dichiara¬ 
zione. Per le variabili abbiamo quattro caratteri di dichiarazione di 
tipo: 


CARATTERE DI 
DICHIARAZIONE 

SIGNIFICATO 

ESEMPI 

% 

variabile intera 

A% 

STEP% 

INCREMENTI 

sono tutte variabili 
intere, indipendente¬ 

mente da eventuali i- 
struzioni di defi¬ 

nizione di tipo per le 
variabili che iniziano 
con A, S e 1. 
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I 

variabile in semplice 
precisione 

SPEED! 

SPACE! 

TIME! 

sono tutte variabili in 
semplice precisione, 

indipendentemente da 

eventuali istruzioni di 
definizione di tipo per 
le variabili che ini¬ 
ziano con le lettere S 
e T. 

# 

variabile in doppia 

TOTAL# 


precisione 

SUBTOTAL# 

XI# 

sono tutte variabili in 
doppia precisione, in¬ 
dipendentemente da 

eventuali istruzioni di 
definizione di tipo per 
le variabili che ini¬ 
ziano con le lettere T, 



S e X. 

$ 

variabile stringa 

A$ 

B1$ 

NAME.CLASS$ 

sono tutte variabili 
stringa, indipen¬ 

dentemente da eventuali 
istruzioni di tipo per 
le variabili che ini¬ 
ziano con le lettere A, 

B e N. 


CONVERSIONI NUMERICHE 


Spesso in un programma o in una linea ad esecuzione immediata si assegna 
una costante di un certo tipo ad una variabile di tipo diverso. 

Per esempio, se si imposta: 


CR 
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1J3ATI 


il BASIC arrotonderà _per._pr.ima _cosa__la costant e 5.31 ( in semplic e 
precisione) all'intero più vicino. Questo numero verrà poi assegnato alla 
variabile intera 1%. Perciò il valore della variabile 1% sarà 5. 


Si può anche assegnare a una variabile di un certo tipo una variabile di 
tipo diverso, come ad esempio: 


SCALE! = B% ES 
5EC0NDS! = CI# 
BOX# = W% EH 


Le procedure di conversione sono elencate nelle pagine seguenti. 


DA PRECISIONE SEMPLICE 0 DOPPIA A INTERO 

11 BASIC converte il valore in semplice o doppia precisione a un intero 
arrotondando la parte frazionaria. 

Nota : La parte frazionaria deve essere maggiore o uguale a -S2768 e 
minore di 32767, altrimenti si ha un errore di Overflow. 

Esempi 


VIDEO 

COMMENTI 

C% = -15.1 

OK 

?C% 

-15 

OK 

il valore -15 è assegnato alla variabile C% 

C% = 4.1E2 

OK 

?C% 

410 

OK 

il valore 410 è assegnato alla variabile C% 

C* = 47.8 

OK 

?C°« 

48 

OK 

il valore 48 è assegnato alla variabile C% 

-.fe. 
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C% = 7.21473D-3 - 

OK 

?C% 

0 

OK 


* * Valore j) e aoScyrìaXO alici VàTldDliG 

C% = -32768.5 

Overflow 

OK 

errore di Overflow 


DA INTERO A PRECISIONE SEMPLICE 0 DOPPIA 

In questo caso la conversione non comporta errori, e il valore convertito 
corrisponde al valore originario esteso con zeri alla destra del punto 
decimale. 


VIDEO 

COMMENTI 

S! =326 

il numero 326 è memorizzato nella variabile S! 

OK 

come 326.0000, ma visualizzato come 326. 

? S ! 


326 


OK 


D# = 326 

il numero 326 è memorizzato nella variabile D# 

OK 

come 326.0000000000000, ma viene visualizzato 

?D# 

come 326. 

326 


OK 



DA SEMPLICE A DOPPIA PRECISIONE 

11 BASIC aggiunge degli zeri alla fine di un numero in semplice precisio¬ 
ne. 


Se il valore originario: 

- ha una rappresentazione binaria esatta, la conversione non comporta 
errori 

- non ha una rappresentazione binaria esatta, un errore aritmetico viene 
introdotto al momento della conversione. — — 

4-14 LINGUAGGIO BASIC - MANUALE GENERALE 




VIDEO 


COMMENTI 



DA DOPPIA A SEMPLICE PRECISIONE 

Questa operazione consiste nel convertire un numero che ha al massimo 16 
cifre significative in un numero che non ne ha più di 7. 

Saranno prese in considerazione soltanto le prime sette cifre del valore 
originario con arrotondamento dell'ultima cifra. 

Prima di visualizzare o stampare tale numero il BASIC lo riduce, sempre 
con arrotondamento a 6 cifre. 

Nota : Se il valore in doppia precisione è fuori dal campo di definizione 
dei valori in semplice precisione, si ha un errore di Overflow. 

Esempio 


VIDEO 

P! = 2.03999996 

OK 

?P ! 

2.04 


COMMENTI 

il valore 2.040000 viene assegnato alla variabi¬ 
le P!, ma questo valore viene visualizzato 
soltanto come 2.04 














CONVERSIONI ILLECITE 


L'utente non può convertire valori numerici in valori stringa, o 
viceversa, mediante un'istruzione di assegnazione. Per esempio: 

C$ = 321 .7 

è una conversione che non è ammessa. (In questi casi le funzioni STR$ e 
VAL permettono di realizzare queste conversioni. Vedere Cap. 9). 


VARIABILI CON INDICE E MATRICI 


Tutte le variabili di cui finora abbiamo parlato sono "variabili 
semplici". Parleremo ora delle "variabili con indice", che sono elementi 
di "matrice" ("array"). 

Una "matrice" è un insieme di variabili dello stesso tipo, aventi tutte 
lo stesso nome ma distinguibili tramite il valore di uno o più indici 
indicati (tra parentesi) dopo il nome. Ad esempio, se A è il nome di una 
matrice a una dimensione, A(0) è il suo primo elemento, A(1) il secondo 
ecc.(supponendo che il valore minimo degli indici sia 0). 

Una matrice può avere un numero qualsiasi di dimensioni. Una matrice a 
una dimensione può essere pensata come una lista di dati. Può avere più 
righe, ma una sola colonna. Una matrice a due dimensioni può essere 
pensata come una tabella di dati. Può avere più righe e più colonne. 

Per definire una matrice, l'utente deve: 

~ attribuire un nome alla matrice (le stesse regole specificate per i 
nomi delle variabili semplici, sono anche valide per i nomi delle 
matrici) 

- stabilire il valore massimo e il valore minimo degli indici. 

Per fare ciò, l'utente deve scrivere un'istruzione DIM ed eventualmente 
un'istruzione OPTION BASE. Se l'utente specifica nel suo programma: 

10 OPTION BASE 1 

11 valore minimo degli indici di tutte le matrici è 1. 

Se, invece, nel programma non è presente alcuna istruzione OPTION BA5E (o 
se è presente l'istruzione OPTION BASE 0)il valore minimo degli indici 
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di tutte le matrici_è-0.._______ 

E' anche possibile ridefinire una matrice tramite una nuova istruzione 
DIM, preceduta da una istruzione ERASE (che verrà spiegata in dettaglio 
nel seguito). 

MATRICI A UNA DIMENSIONE 

Supponiamo di avere la seguente lista di numeri: 

17, -9, 32, 105, -48 

Se definiamo una matrice numerica a una dimensione V, possiamo memorizza¬ 
re tutti i valori della lista come elementi di questa matrice e possiamo 
accedere a ciascun elemento tramite il valore del suo indice. 


Matrice V 


Elemento Contenuto 


V(0) 17 

V(1) -9 

V ( 2 ) 32 

V(3) 105 

V(4) -48 

Ogni elemento della matrice V è individuato dal 
suo indice; un numero intero positivo compreso 
tra parentesi dopo il nome della matrice. Per 
esempio, il valore di V(1) è -9, e il valore di 
V(3) è 105. L'indice identifica la posizione 
dell'elemento all'interno della matrice. 


MATRICI A PIU' DIMENSIONI 

Possiamo definire una matrice a due dimensioni per memorizzare i valori 
di una tabella. Supponiamo di avere la seguente tabella: 


NOME 

CODICE 

NAZIONE 

SESSO 

Anna 

21SAA 

Gran Bretagna 

F 

Giovanni 

35ECK 

USA 

M 

Riccardo 

70UST 

Svezia 

M 
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Questa tabella comprende 3 -righe._e_4_coLanne_ per u n totale di 17 valori 
stringa. 

Se definiamo una matrice stringa A$, possiamo memorizzare tutti i valori 
della tabella come elementi di questa matrice e possiamo accedere a 
ciascun elemento tramite il valore dei suoi due indici. 

Matrice A$ 


INDICE 

0 

1 

2 

3 

0 

Anna 

21SAA 

Gran Bretagna 

F 

1 

Giovanni 

35ECR 

USA 

M 

2 

Riccardo 

70WST 

Svezia 

M 


Ogni elemento della matrice A$ è individuato da due indici, racchiusi 
tra parentesi dopo il nome della matrice e separati da una virgola. 

11 primo indice rappresenta la riga e il secondo la colonna. Per esempio 
il valore di A$(0,1 ) è la stringa 21SAA, e il valore di A$(2,3) è il 
carattere M. 

E' anche possibile definire matrici con più di due dimensioni, ma queste 
sono usate molto di rado. 


DIM (PROGRAMMA) 

Specifica il nome di una matrice, il numero delle sue dimensioni e il 
valore massimo dell'indice per ogni dimensione. L'istruzione DIM può 
specificare una o più matrici. 



Sintassi 4-2 Istruzione DIM 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

VALORI DI DEFAULT 

array 

è il nome di una 
matrice (qualsiaSji 
nome di variabile 
è consentito) 


upper bound 

è una qualsiasi co¬ 
stante numerica po¬ 
sitiva, variabile 
numerica con valore 
positivo. Se questo 
valore non è intero 
viene arrotondato 
all'intero più 
vicino. 

se non è presente alcu¬ 
na istruzione DIM, il 
valore massimo dell'in¬ 
dice per ogni dimensio¬ 
ne viene assunto pari a 
10, e il numero di 
dimensioni viene stabi¬ 
lito non appena si 
incontra un elemento 
della matrice nel pro¬ 
gramma. 


Eseapio 


SE l'utente imposta... 


10 01M A(5), B$(20,30) 


ALLORA. .. 


CR 


definisce una matrice A a una dimensione 
con l'indice compreso tra 0 e 5, e una 
matrice stringa a due dimensioni B$ con 
l'indice di riga compreso tra 0 e 20 e 
l'indice di colonna tra 0 e 30. 


Nota : A è una matrice numerica a meno che 
un'istruzione DEFSTR stabilisca altrimenti. 


Numero di Dimensioni 

In BASIC è possibile definire matrici con numero arbitrario di dimensio¬ 
ni, ma le matrici di uso più frequente hanno soltanto una o due dimensio¬ 
ni . 

Se l'utente non introduce alcuna istruzione DIM nel programma, la matrice 
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viene creata quando il BASIC incontra per la prima volta un suo elemento. 
In base al numero degli indici il BASIC può determinare il numero delle 
dimensioni. Per esempio, se in una istruzione compare: 

ARI(3,5,10) 

allora il BASIC crea la matrice ARI con tre dimensioni, e con un valore 
massimo dell'indice per ogni dimensione pari a 10. 


Numero di Elementi per Dimensione 


SE... 

E SE... 

ALLORA... 

nessuna istruzione 

DIM è presente 

viene specificato 

0PTI0N BASE 0 

si hanno 11 elementi 
per ogni dimensione 
(indici tra 0 e 10) 


viene specificato 

0PTI0N BASE 1 

si hanno 10 elementi 
per ogni dimensione 

(indici tra 1 e 10) 

è presente una 
istruzione DIM 

viene specificato 

0PT10N BASE 0 

il numero di elementi 
per ogni dimensione è 
pari al valore massimo 
dell’indice + 1 


viene specificato 

0PT10N BASE 1 

il numero di elementi 
per ogni dimensione è 
pari al valore dell'in¬ 
dice. 
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I DATI 


Definizione di una Matrice 


L'UTENTE DEVE 

E... 

OPPURE... 

stabilire il valore 
minimo degli indici 

può utilizzare l'i¬ 
struzione 0PTI0N BASE 1 

può adottare il valore 
di default 0PT10N BASE 
0 

assegnare un nome 

alla matrice 

può utilizzare l'i¬ 
struzione DIM 

può far riferimento a 
un elemento della ma¬ 
trice nel programma. 

Nota: In questo caso il 
valore massimo dell'in¬ 
dice per ogni dimensio¬ 
ne risulta pari a 10. 

stabilire il nume¬ 
ro di dimensioni 

stabilire il valore 
massimo dell'indice 
per ogni dimensione 


Note 

- Una istruzione DIM inizializza a zero tutti gli elementi delle matrici 
specificate. 

- Una istruzione DIM non può essere preceduta da un riferimento a un 
elemento di matrice. 

- Una istruzione DIM non può stabilire il valore massimo dell’indice per 
dimensione, se il controllo dell'esecuzione salta le DIM. 

Per esempio: 


VIDEO 


LIST 
10 1=1 
20 GOTO 40 
30 DIM A(50) 

40 A(10)=3 
50 A(11)=45 
0K 
RUN 

Subscript out of range in 
0K 


COMMENTI 


L'M20 visualizzerà il messaggio d'errore: 
Subscript out of range in 50 

quando viene eseguita l'istruzione 50, dato 
che l'istruzione 30 è stata saltata e il 
valore massimo dell'indice viene assunto 
pari a 10. 
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ERASE (PROGRAMMA) 


Libera lo spazio riservato a una o più matrici e rende disponibili i 
relativi nomi per nominare altre variabili del programma. 



Sintassi 4-3 Istruzione ERASE 


Esempio 


dopo aver eseguito l'istruzione 100, lo spazio 
allocato per le matrici A e B viene rilascia¬ 
to. L'utente può allora definire altre varia¬ 
bili (in particolare matrici) con quegli 
stessi nomi: qui l'istruzione 110 definisce 
altre due matrici A e B con un diverso numero 
di dimensioni e con un diverso valore massimo 
degli indici. 

Note 

Di norma non è consigliabile riutilizzare un identificatore per altri 
scopi perchè può essere fonte di errori o può rendere il programma poco 
leggibile. 

Tuttavia il ridimensionamento di matrici può risultare molto utile, ad 
esempio quando il nome di una matrice viene utilizzato da una subroutine 
e si vogliono passare a questa subroutine matrici con un diverso numero 
di dimensioni (o un diverso valore massimo degli indici). 


COMMENTI 


VIDEO 

10 DIM A(15,15),B(10,20) 


100 ERASE A,B 

110 DIM A(100),B{2,2,2) 
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1 DATI 


0PT10N BASE (PROGRAMMA/1MMED1ATO)... .. . . 

Dichiara il valore minimo degli indici delle matrici. 



Sintassi 4-4 Istruzione 0PT10N BASE 

Valori di Default 

Se l'utente non specifica 0PT10N BASE 1, per default viene assunto 0PT10N 
BASE 0; pertanto il valore, minimo degli indici delle matrici è 0. 

Esempio 








5. COME VENGONO INTRODOTTI I DATI IN BASIC 




SOMMARIO 


Questo capitolo si propone di descrivere alcune modalità con le quali 
vengono forniti in BASIC i dati al computer. 

Verranno prese in esame: 

- le istruzioni CLEAR, LET e SWAP 

- le istruzioni INPUT e LINE INPUT 


- le istruzioni DATA, READ e RESTORE 


Altre modalità di 
dei file esterni) 
12 ). 


introduzione dei dati (che comportano l'utilizzazione 
saranno esaminate successivamente (vedere il Capitolo 
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COME VENGONO INTRODOTTI I DATI IN BASIC 


ISTRUZIONI DI ASSEGNAZIONE 

In BASIC vi sono tre istruzioni di assegnazione: 

— l'istruzione CLEAR che consente di azzerare le variabili numeriche, 
inizializzare le variabili stringa al valore stringa nulla e di 
chiudere tutti i file dati. 

— 1 istruzione LET, che consente di assegnare il valore di una espres¬ 
sione ad una variabile. La variabile e l'espressione devono essere 
dello stesso tipo (entrambe numeriche o entrambe stringa). 

— 1 istruzione SWAP, che consente di scambiare i valori di due varia¬ 
bili, purché siano dello stesso tipo (intera, in semplice precisione, 
in doppia precisione, stringa). 

Le istruzioni LET e SWAP vengono spesso utilizzate per eseguire calcoli 

immediati. 


CLEAR (PROGRAMMA/IMMEDIATO) 


Azzera tutte le variabili numeriche, inizializza le variabili stringa al 
valore stringa nulla e chiude tutti i file dati, che, in precedenza, 
erano stati aperti. E' anche possibile, con l'istruzione CLEAR, 
stabilire lo spazio di memoria dedicato al BASIC e quello dedicato allo 
stack. 


CLEAR 


>^d> 


J. 


r 

ì i 

r 

U 

memory 

LU 





o 


stack 


Sintassi 5-1 Istruzione CLEAR 


5-1 





Oove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

memory 

rappresenta l'ammontare di memoria (in byte) 
disponibile per i programmi BASIC. 


La memoria, utilizzabile dal BASIC, può anche 
essere stabilita con il comando PCOS sbasic. 

11 suo valore di default è quello stabilito con 
il comando sbasic oppure 38000 byte (come 
seconda alternativa) 

stack 

stabilisce lo spazio, dedicato allo stack. 

11 valore di default è 512 byte. 

Lo stack è una parte della memoria dedicata al 
BASIC, utilizzata per memorizzare l'indirizzo di 
ritorno dei sottoprogrammi, delle funzioni ecc. 


Esempi 

CLEAR 

CLEAR ,32768 
CLEAR ,,2000 
CLEAR ,32768,2000 


Note 

All'inizio dell'esecuzione di un programma BASIC, tutte le variabili 
numeriche vengono azzerate e tutte le variabili stringa vengono 
inizializzate al valore stringa nulla (ad eccezione delle variabili 
definite nell'area COMMON in fase di CHAINing di un programma ad un 
altro, vedere il Capitolo 11). 

11 BASIC alloca in modo dinamico lo spazio riservato alle stringhe. 
Viene visualizzata una segnalazione d'errore (Out of string space) nel 
caso in cui non ci sia memoria sufficiente per il BASIC. 
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LET ( PROGRAMMA/IffIED IATO) 

Assegna un valore ad una variabile. 



Sintassi 5-2 Istruzione LET 


Esempi 


SE l'utente imposta... 


LET K = 1 .5 


CR 


LET X = K + 2 


CR 


A$(1) = "ABC' 


CR 


ALLORA... 


il valore 1.5 è assegnato alla 
variabile numerica K 


il valore dell'espressione numeri¬ 
ca K + 2 è assegnato alla varia¬ 
bile numerica X 


il valore della costante stringa 
"ABC" è assegnato alla variabile 
stringa con indice A$(I) 

Nota : La parola chiave LET è 
opzionale 


Assegnazioni numeriche 

Se il valore dell'espressione numerica non è dello stesso tipo della 
variabile di destinazione (cioè la variabile che compare alla sinistra 
del segno di uguaglianza) il BASIC converte il tipo del valore dell'e¬ 
spressione in modo da renderlo uguale a quello della variabile di de¬ 
stinazione in base alle regole precedentemente descritte (vedere il 
paragrafo CONVERSIONE NUMERICHE del Capitolo 4). Se la variabile di 
destinazione non può contenere il valore calcolato, un arrotondamento o 
un overflow possono verificarsi. 
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Assegnazioni stringa 


L'assegnazione stringa viene effettuata trasferendo il valore dell'e¬ 
spressione stringa nella variabile di destinazione carattere per 
carattere da sinistra a destra. L'operazione termina quando tutti i 
caratteri sono stati trasferiti. 


Note 

Non sono ammesse assegnazioni simultanee. Se ad esempio si impostasse: 
100 LET B = C = 0 EH 

il BASIC INTERPRETEREBBE IL SECONDO SEGNO DI UGUAGLIANZA COME UN 
OPERATORE DI CONFRONTO e assegnerebbe a B il valore -1 (cioè vero) se C 
è uguale a 0, ed il valore 0 (cioè falso) se C è diverso da zero. (Per 
ulteriori dettagli sulle espressioni di confronto vedere il Capitolo 6). 

SWAP (PROGRAMMA/IMMEDIATO) 


Permette di scambiare i valori di due variabili semplici. L'istruzione 
SWAP può essere eseguita con qualsiasi tipo di variabile (intera, in 
semplice precisione, in doppia precisione, stringa), ma le due variabili 
devono essere dello stesso tipo, altrimenti verrà visualizzato l'errore 
"Type mismatch" (incompatibilità di tipo). Le variabili devono anche 
essere inizializzate, altrimenti verrà visualizzato l'errore "Illegal 
function cali". 



Sintassi 5-3 istruzione SWAP 
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Esempio 


VIDEO 

LIST 


10 A$ = " ONE " 


20 B$ = " ALL" 


30 C$ = " FOR " 


40 PR1NT A$;C$;B$ 


50 SWAP A$;B$ — 

■- 1 j 

60 PR1NT A$;C$;B$ 


Ok 


RUN 


ONE FOR ALL 


ALL FOR ONE 


Ok 



COMMENTI 


L'istruzione 50 esegue l'opera¬ 
zione di SWAP fra le variabili A$ 
e B$. L'istruzione 40 visualizza 
ONE FOR ALL, l'istruzione 60 
visualizza ALL FOR ONE. 


IL FILE DATI INTERNO 


Molti problemi rendono necessaria l'introduzione di una grande quantità 
di dati nel computer. Per fare ciò, l'utente può utilizzare ripetu¬ 
tamente le istruzione LET, INPUT e LINE INPUT. 

E' evidente, però, che tale procedura può risultare, in certi casi, 
molto pesante. Un metodo molto più conveniente ed efficace per intro¬ 
durre dati è quello di servirsi delle istruzioni DATA, READ e RESTORE. 

Le istruzioni DATA creano un file "interno", cioè una sequenza di dati 
(del programma), che devono essere trasferiti nelle variabili di pro¬ 
gramma con l'uso di una o più istruzioni READ. 

L'istruzione RESTORE riposiziona il puntatore ("pointer") all’inizio del 
file o al numero di linea specificato. 


DATA/READ/RESTORE (PROGRAMMA) 


DATA crea un file dati interno. 
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READ legge i dati dal file interno (creato con una o più istruzioni 
. DATA) e li assegna alle variabili specificate. 


RESTORE sposta il pointer all'inizio di un file dati interno o 
di linea specificato. 



Sintassi 5-4 Istruzione DATA 



Sintassi 5-5 Istruzione READ 



RESTORE 



r. 




vJ 

u 

line 

L. 

r 

f 

number 



Sintassi 5-6 Istruzione RE5T0RE 


al numero 
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Eseapi 
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. LIST 

10 READ A,B,C,D,E 
20 DATA 1,2,3,4 
Ok 
RUN 

Out of data 
Ok 


LIST 

10 READ A,8,C 

20 DATA 15,25,35,5,6,12 

30 PRINT A;B;C 

40 RESTORE 

50 READ X,Y,Z 

60 PRINT X;Y;Z 

Ok 

RUN 

15 25 35 

15 25 35 


LIST 

10 READ XI $,Y1$,Z1 

20 DATA "DENVER,", COLORADO, 80211 

30 PRINT XI$;Y1$;Z1 

Ok 

RUN 

DENVER,COLORADO 80211 
Ok 


l'M20 visualizza un messaggio di 
errore: 

Out of data 

e ritorna in Stato Comandi, perchè 
ci sono più variabili che dati. 


l'istruzione 10 fa si che alla 
variabile A venga assegnato il 
valore 15, a B il valore 25 e a C 
il valore 35. L'istruzione RESTORE 
della linea 40 fa si che i valori 
vengono assegnati partendo nuova¬ 
mente dall'inizio del file. Quindi 
l'istruzione 60 fa si che gli 
stessi valori assegnati ad A,8,C 
(15,25,35) siano assegnati rispet¬ 
tivamente a X,Y,Z. 

Se non si fosse utilizzata l'i¬ 
struzione RESTORE, ad X sarebbe 
stato assegnato il valore 5, ad Y 
il valore 6 e a Z il valore 12. 


l'istruzione 10 fa si che ad XI$ 
, sia assegnato il valore DENVER, 
(inclusa la virgola finale), ad 
Y1$ il valore COLORADO e a ZI il 
valore 80211. 

Nota : Le istruzioni READ possono 
contenere sia variabili numeriche 
che variabili stringa. Le istru¬ 
zioni DATA possono contenere sia 
dati numerici che dati stringa. 

Il tipo di un dato in ingresso 
(nella sequenza dei dati) deve 
essere coerente al tipo di varia¬ 
bile alla quale deve essere asseg¬ 
nato; cioè le variabili numeriche 
richiedono, come dati, costanti 
numeriche (è consentita la conver¬ 
sione da un tipo numerico ad un 
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altro, vedere il Capitolo 4), 
mentre le variabili stringa ri¬ 
chiedono dati stringa tra virgo- 
lette o senza virgolette. Una 
stringa deve essere tra virgolette 
se contiene virgole (ad esempio 
DENVER,) oppure spazi iniziali o 
finali (ad esempio lo spazio che 
precede COLORADO nell'istruzione 
20 non viene assegnato alla varia¬ 
bile Y1$ perchè COLORADO è una 
stringa non racchiusa tra virgo- 
lette). 


ISTRUZIONI DI INPUT 

L'istruzione DATA utilizza costanti per assegnare valori a variabili. 
Quando si introduce un programma, occorre conoscere quali valori si 
intendono assegnare. Inoltre i valori, contenuti nel file dati interno, 
sono registrati su disco insieme con il programma. Questi valori sono 
quindi permanenti e possono essere modificati solo cambiando una o più 
istruzioni DATA del programma. 

Le istruzioni INPUT e LINE INPUT offrono una maggior flessibilità in 
quanto consentono di introdurre valori solo al momeato dell'esecuzione 
del programma. 

Quando il controllo dell'esecuzione arriva su una di queste istruzioni, 
l'esecuzione del programma viene sospesa e l'M20 rimane in attesa di 
dati da tastiera. Dopo che il programma è stato registrato in memoria, è 
possibile eseguirlo ogni volta che lo si desideri ed è possibile fornire 
i valori al computer sul momento senza dover modificare il programma. 
Questa flessibilità consente, pertanto, di scrivere un programma 
generale atto a risolvere un problema particolare ancora prima di 
conoscere i valori specifici che il programma dovrà utilizzare. Se si 
devono, però, introdurre molti dati è preferibile utilizzare un file 
dati interno (dati permanenti) o uno o più file dati esterni (vedere il 
Capitolo 12). 

L'istruzione INPUT consente l'introduzione di uno o più dati numerici o 
dati stringa (separati da una virgola) che saranno assegnati alla 
variabile o alle variabili indicate nell'istruzione. 
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L'istruzione LINE INPUT permette di introdurre un'intera linea di input 
e di assegnarla ad una variabile stringa. E' possibile inserire un 
messaggio prompt sia nell'istruzione INPUT che nella LINE INPUT; questo 
messaggio verrà visualizzato su video quando l'istruzione viene eseguita 
per ricordare ciò che l'utente deve introdurre. 


INPUT (PROGRAMMA) 


Legge dati da tastiera e li assegna ad una o a più variabili specifi¬ 
cate. 



Sintassi 5-7 Istruzione INPUT 


Un Punto Interrogativo 

Un punto interrogativo (seguito da uno spazio) viene automaticamente 
visualizzato come uno "standard prompt” in fase di esecuzione di 
un'istruzione INPUT, anche se l'istruzione non include la clausola 
"prompt string". 


VIDEO 


LIST 

10 INPUT X 

20 PR1NT X "SQUARED 1S" 

30 END 

Ok 

RUN 

? 5 

5 SQUARED IS 25 
Ok 


XA2 


COMMENTI 


quando si esegue l'istruzione 10 
lo "standard prompt" (? ) viene 

visualizzato e con ciò si indica 
che il programma è in attesa di un 
dato. 


In questo caso non si utilizza la 
clausola "prompt string" nel¬ 
l'istruzione INPUT (vedere l'i¬ 
struzione 10). 


5-10 


LINGUAGGIO BASIC - MANUALE GENERALE 






COME VENGONO INTRODOTTI I DATI IN BASIC 


Self Prompting 

Inserendo una "prompt string" in una istruzione INPUT, è possibile 
visualizzare un messaggio qualsiasi per ricordare all'operatore il 
valore (o i valori) da introdurre. 


VIDEO 


COMMENTI 


LIST 

10 PI = 3.1415 

20 INPUT "Radius";R 

30 A = P1*RA2 

40 PR1NT "Area";A 

50 GOTO 20 

Ok 

RUN 


l'esecuzione dell'istruzione 20 fa 
visualizzare il messaggio Radius 
davanti allo standard prompt (? ) 


Radius? 7.4 
Area 172.029 
Radius? 


ecc. 


Eliminazione dello Standard Prompt 

L'utente può eliminare lo standard prompt (? ), scrivendo una virgola 
dopo il prompt. 


VIDEO 


COMMENTI 

LIST 


lo standard prompt (? ) viene 

10 INPUT "Date ", D$ 


eliminato perchè nell'istruzione 

20 PRINT D$ 


10 la stringa "Date " (prompt 

Ok 


string) è seguita da una virgola 

RUN 


(,). 

Date 30/Oct/69 



30/Oct/69 



Ok 
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Eli«inazione dell'Eco di 


L'utente può eliminare l'eco di su video introducendo un punto e 

virgola (;) dopo la parola chiave INPUT. 


VIDEO 


COMMENTI 

LIST 

10 INPUT; "Date";D$ 

20 PRINT " J.C." 

Ok 

RUN 

Date? 30/Oct/69 J.C. 


l'eco su video del ritorno a 
capo/interlinea viene eliminato 
inserendo un punto e virgola (;) 
immediamente dopo la parola chiave 
INPUT (vedere l'istruzione 10). 

La successiva operazione PR1NT/IN- 
PUT (vedere l'istruzione 20) sarà 
eseguita dalla successiva posizio¬ 
ne su video. 


Introduzione di una Lista di Dati 

Una istruzione INPUT consente l'inserimento da tastiera di uno o più 
dati numerici o dati stringa. 


VIDEO 


LIST 

10 INPUT A,B$,C(3) 
20 PR1NT A;B$;C(3) 
30 GOTO 10 
Ok 
RUN 

? 1.2,ABC,4 

1.2 ABC 4 
? ABD,1.3,5 
?Redo from start 
? 1.3,ABD,5 

1.3 ABO 5 
? AC 

Break in 10 
Ok 


COMMENTI 


quando si esegue l'istruzione 10 
l'utente deve introdurre tre dati. 
Il primo deve essere numerico 
(1.2), il secondo di tipo stringa 

(ABC) (non è necessario che sia 
tra virgolette), il terzo numerico 
(4). 

Verranno assegnati rispettivamente 
alle variabili A,B$ e C(3). 

Quando si esegue per la seconda 
volta l'istruzione 10 supponiamo 
di assegnare un dato non coerente 

(ABD) , e cioè una stringa al posto 
di un numero. Il sistema visualiz¬ 
za: 
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? Redo from start 

e l'utente deve introdurre nuova¬ 
mente il dato. 

Per interrompere l'esecuzione del 
programma occorre premere 


Per riprenderne l'esecuzione pre¬ 
mere KaaoD eoi 


Nota : 11 tipo di dato, che viene 
introdotto da tastiera, deve es¬ 
sere dello stesso tipo della 
variabile di destinazione, cioè le 
variabili numeriche richiedono, 
come dati, costanti numeriche (è 
possibile la conversione da un 
tipo numerico ad un altro, vedere 
il Capitolo 4), e le variabili 
stringa richiedono, sempre come 
dati, stringhe racchiuse o no tra 
virgolette. E' necessario che la 
stringa sia racchiusa tra virgo- 
lette se contiene virgole o spazi 
iniziali o finali. 


Valori numerici possono essere 
introdotti in variabili stringa 
tramite un'istruzione INPUT. Se 
introduciamo un numero in una 
variabile stringa, questo viene 
interpretato come la sequenza dei 
corrispondenti caratteri ASCII. 
Per riottenere il valore numerico, 
l'utente dovrà usare la funzione 
VAL (vedere il Capitolo 9), altri¬ 
menti si avrebbero errori di 
incompatibilità di tipo. 
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? Redo from Start 


Se ad un richiesta di INPUT si risponde con troppi o con pochi dati, 
oppure con un dato di tipo non corretto (un dato stringa al posto di un 
dato numerico), su video verrà visualizzato il messaggio d'errore "? 
Redo from Start". Fin quando l'utente non fornirà una risposta corretta, 
non verrà assegnato alcun valore alle variabili. 


LINE INPUT (PROGRAMMA) 


Permette l'introduzione di una intera linea, fino al ritorno a capo/in¬ 
terlinea e la assegna ad una variabile stringa senza far uso di deli¬ 
mitatori (la lunghezza massima di una linea è di 255 caratteri). 



Sintassi 5-8 Istruzione LINE INPUT 


Un Punto Interrogativo all'interno di un Prompt 

Lo standard prompt (? ) non compare quando si esegue una istruzione LINE 
INPUT. Se si desidera visualizzare il punto interrogativo si dovrà 
includerlo alla fine della clausola "prompt string". 


VIDEO 


LIST 

10 LINE INPUT "Name? 
20 PRINT "JONES" 

Ok 

RUN 

Name? LINDA 

JONES 

Ok 


COMMENTI 


”;N$ 


la stringa prompt (Name? ) viene 
visualizzata prima dell'introdu¬ 
zione dei dati. 

Tutti i caratteri introdotti dalla 
fine del prompt al B<*W venoono 
assegnati alla variabile stringa 
(N$ ). 
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COME VENGONO INTRODOTTI I DATI IN BASIC 


Eliminazione dell'Eco di 


CR 


E' possibile eliminare l'eco di |S 
virgola (;) subito dopo LINE INPUT. 


su video introducendo un punto e 


VIDEO 


LIST 

10 LINE INPUT ;"Name? 
20 PR1NT " JONES" 

Ok 

RUN 

Name? LINDA JONES 
Ok 


I! 


;N$ 


COMMENTI 


l'eco sul video del ritorno a 
capo/interlinea viene eliminato 
inserendo un punto e virgola (;) 
subito dopo LINE INPUT (vedere 
l'istruzione 10). 


La prossima operazione PR1NT/1NPUT 
(vedere l'istruzione 20) incomin- 
cerà a visualizzare i caratteri 
dalla posizione successiva su 
video. 
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SOMMARIO 


Questo capitolo classifica le espressioni usate in BASIC in numeriche, 
stringa, di confronto o logiche. 

Vengono descritte le regole che l'utente deve rispettare nella formula¬ 
zione dell'espressione ed il livello di priorità che il BASIC assume nel 
loro svolgimento. 
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ESPRESSIONI NUMERICHE 

La maggior parte dei programmi richiede una qualche forma di calcolo 
numerico. 

Come si è potuto notare negli esempi fatti, alla sinistra del segno di 
uguaglianza di un'istruzione LET appaiono solo variabili. 

Alla destra del segno uguale possono invece apparire sia variabili che 
costanti. Infatti, esse possono essere collegate da simboli speciali 
chiamati operatori, che indicano quale operazione numerica deve essere 
svolta. 

Si considerino i seguenti esempi: 

70 LET L=ACC0UNT 
60 LET Y = 16+1.7+12 
200 M = 83-44+37/N 
20 LET X = X+1 

L'ultima istruzione è di particolare interesse. La maggior parte delle 
istruzioni LET ha le caratteristiche delle equazioni algebriche; 
quest'ultima no. L'equazione X = X+1 è priva di significato da un punto 
di vista algebrico. 

L'istruzione LET assegna un valore ad una variabile: non implica che i 
valori su entrambi i lati del segno di uguaglianza siano matematicamente 
uguali. Quest'ultima istruzione è valida e significativa e può essere 
interpretata nel seguente modo: si aggiunga 1 al valore della variabile 
X e si assegni ad X questo nuovo valore. Il nuovo valore di X sostituirà 
quello vecchio. 11 segno di uguale è un operatore. 

La parte dell'istruzione LET alla destra del segno di uguale si chiama 
espressione. L'espressione specifica quale valore deve essere assegnato 
alla variabile che si trova alla sua sinistra. (Lo svolgimento di una 
espressione porta ad un solo valore numerico). Una espressione numerica 
può essere composta da un solo numero o da una sola variabile numerica o 
da una combinazione di numeri e di variabili numeriche e operatori. Si 
deve però tenere presente che occorre assegnare un valore ad una 
variabile numerica prima che questa possa essere usata in una 
espressione. In caso contrario, alla variabile numerica viene automati¬ 
camente attribuito il valore 0. 

Alcuni esempi di espressioni numeriche sono presentati qui di seguito: 
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X 

X+Y+SPEED 

6.4A2 

-7+A/CYAR 


Operatori Numerici 

Come si è notato in precedenza, il BASIC si serve di operatori per 
definire le operazioni numeriche. Vi sono otto operazioni numeriche, 
ognuna caratterizzata da un proprio simbolo. 


SIMBOLO 

OPERAZIONE 

ESEMPI 

+ 

addizione 

X = 3.2 



Ok 



?X+1 .1 



4.3 



Ok 

- 

sottrazione 

?X-1.3 



1.9 



Ok 

\ 

divisione tra interi 

? 10 \4 



2 


Gli operandi sono arrotondati 

Ok 


al numero intero più vicino 

? 25.68\6.99 


(che deve essere compreso nel- 

3 V 


l'intervallo da -32768 a 32767) 

Ok X, 


prima di effettuare la divi- 

V ( 


sione e anche il quoziente 



viene troncato al valore in- 



tero più vicino. 


MOD 

divisione modulo 

710.4 MOD 4 



2 


Fornisce quel numero intero 

Ok 


che è il resto di una divisio- 



ne tra numeri interi 

(10/4=2 con resto 2) 



725.68 MOD 6.99 



5 



Ok 



«fc- ■■■ 

(26/7=3 con resto 5) 
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★ 

moltiplicazione 


?X*3.92 

12.544 

Ok 

/ 

divisione 


? 3/6.05 

0.495868 

Ok 

- 

cambiamento di segno 


?-X 




-3.2 




Ok 

A 

elevamento a potenza 


?XA3 

32.768 

Ok 


Note 

Accertatevi di usare il simbolo * quando si vuole eseguire una moltipli¬ 
cazione. In matematica, 6X è una espressione valida; nel linguaggio 
BASIC, si deve, invece, usare 6*X per esprimere la moltiplicazione per 
sei volte della variabile X. 

Per vostra comodità, tutti gli operatori numerici usati in BASIC sono 
disponibili sia nella sezione numerica della tastiera dell'M20 che in 
quella alfanumerica (ad eccezione del simbolo di elevamento a potenza, 
che compare solo nella sezione alfanumerica e di MOD che deve essere 
introdotto digitando i tre caratteri che lo compongono). 

Livello di Priorità degli Operatori Numerici 

Quando nell'ambito di una espressione vengono utilizzati due o più opera¬ 
tori, spesso si potrebbero verificare situazioni ambigue. Ad esempio, 
l'espressione: 

3*L - 6*W 

deve intendersi 

(3*L) - (6*W) 
oppure 

3*(L-6*W)? 
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11 linguaggio BASIC ha, però, dei livelli di priorità, che vengono segui¬ 
ti nell'esecuzione delle diverse operazioni numeriche. Le operazioni 
numeriche e i livelli di priorità vengono riportati qui di seguito (nel¬ 
l'ordine di priorità decrescente). 


LIVELLO DI PRIORITÀ' 

OPERAZIONE 

COMMENTI 

IL PIU' ALTO 

elevamento a potenza 



cambiamento di segno 



moltiplicazione e 
divisione 

la moltiplicazione e 
la divisione hanno lo 
stesso livello di 

priorità 


divisione tra in¬ 
teri 



divisione modulo 


IL PIU' BASSO 

addizione e sottra¬ 
zione 

l’addizione e la sot¬ 
trazione hanno lo 

stesso livello di prio¬ 
rità 


Note 

Riferendoci all'esempio precedente, possiamo ora dire che l'espressione 
3*L - 6*W deve intendersi (3*L) - (6*W). 

Nel caso di operatori con la stessa priorità (ad. es. / e *) le 
operazioni vengono eseguite nell'ordine da sinistra a destra. Quindi, 
9/3*3 è l'equivalente di (9/3)*3: entrambe portano allo stesso risultato 
di 9. 


Uso delle Parentesi per Modificare il Livello di Priorità 

Si possono presentare dei casi in cui si vuole cambiare il livello 
normale di priorità con cui vengono eseguite le operazioni. Per ottenere 
questo, si devono usare le parentesi con le stesse modalità dell'alge¬ 
bra. In questo caso, il calcolo inizia con lo svolgimento delle 
operazioni racchiuse tra le parentesi più interne per poi passare via 
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via a quelle più esterne. All'interno di una coppia di parentesi, viene 
rispettato il livello normale di priorità delle operazioni. 

Qui di seguito viene presentato un semplice esempio di utilizzazione 
delle parentesi. 

2 

Supponiamo di voler calcolare (5X) . Se in BASIC questa espressione 
viene impostata sotto forma di 5*XA2, la X viene innanzi tutto elevata 
al quadrato, ed il risultato viene successivamente moltiplicato per 5, 
dal momento che l'elevamento a potenza ha un livello di priorità 
superiore alla moltiplicazione. Per modificare questa situazione, è 
sufficiente impostare l'espressione sotto forma di (5*X)A2. In questo 
caso, la X viene dapprima moltiplicata per 5 ed il risultato viene poi 
elevato al quadrato. 

E' evidente che l'equivalente in BASIC risulterà tanto più complesso 
quanto più complessa sarà l'espressione numerica. Negli esempi riportati 
qui di seguito, si evidenziano espressioni numeriche ed i loro 
equivalenti in BASIC. Tali esempi dovrebbero contribuire ad una più 
agevole comprensione delle regole di priorità. 


Esempi 


ESPRESSIONE 

NUMERICA 

EQUIVALENTE 

IN BASIC 

INTERPRETAZIONE 

x + y + z 

2 

(X+Y+Z)/2 

1. Sommare X,Y e Z 

2. Dividere la somma per 2 

y + z 

X+ 2 

X+(Y+Z)/2 

1. Sommare Y e Z 

2. Dividere la somma per 2 

3. Sommare X al risultato 

2x + 5 

2*X+5 

1. Moltiplicare X per 2 

2. Sommare 5 al risultato 

2(x + 4) 

2*(X+4) 

1. Sommare 4 e X 

2. Moltiplicare la somma per 2 

x 2 + 3 

XA2+3 

1. Elevare X al quadrato 

2. Sommare 3 al risultato 

.a 


6-5 














(x + 3) 2 

(X+3)A2 

1. Sommare 3 e X 

2. Elevare al quadrato il risultato 

(x + 3)^ 

4 

(X+3)A2/4 

1. Sommare 3 e X 

2. Elevare la somma al quadrato 

3. Dividere il risultato per 4 

2 

x x + y 

6 2 

(XA2/6)*((X+Y)/2)) 

1. Elevare X al quadrato e dividere 
il risultato per 6 

2. Sommare X e Y e dividere per 2 

3. Moltiplicare il primo risultato 
per il secondo 


Note 

E' buona norma di programmazione fare uso delle parentesi ogni volta che 
vi sono dubbi sullo svolgimento dell’espressione, anche quando esse non 
sono strettamente necessarie. 

Le espressioni usate in un programma, possono essere molto complesse. 
Nell'eventualità che un programma venga registrato in memoria e sia 
utilizzato solo sporadicamente, è facile dimenticare i calcoli che esso 
esegue. Per questo motivo, quando si scrive un programma è utile usare 
l'istruzione REM del linguaggio BASIC ed i campi commento. 


Tipo di Espressione 

11 tipo di un'espressione numerica, e cioè il tipo del risultato 
ottenuto dallo svolgimento di un'espressione (prima della sua assegna¬ 
zione ad una variabile) dipende dal tipo degli operandi. 

Si possono ipotizzare quattro situazioni a seconda del tipo dei due 
operandi in questione. 

L'espressione, nell'eventualità in cui in essa intervengano più di due 
operandi, può essere considerata come una serie di calcoli in cui 
intervengono due operandi. 

La tabella che segue fornisce un sommario delle quattro situazioni 
possibili. 
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SE. .. 

ALLORA... 

VIDEO 

entrambi gli operandi 
sono dello stesso 
tipo numerico (in¬ 
tero, in precisione 
semplice, in precisio¬ 
ne doppia) 

il risultato è dello 
stesso tipo degli 
operandi 

A #= 3.29745219 

Ok 

8 # = 4.5729719D-1 

Ok 

?A#+B # 

3.75474938 

Ok 

un operando è in¬ 
tero mentre l'altro 
è in semplice pre¬ 
ci sione 

il risultato è in 
semplice precisione 

1% = 25 

Ok 

C! = 4.2975 

Ok 

?1%—C! 

20.7025 

Ok 

un operando è in¬ 
tero mentre l'altro 
è in doppia pre¬ 
cisione 

il risultato è in 
doppia precisione 

?1%*A# 

82.43630475 

Ok 

un operando è in 
semplice precisione 
e l'altro in doppia 
precisione 

il risultato è in 
doppia precisione 

?C!/B# 

9.39760887993736 

Ok 


Arrotondamento, Overflow e Underflow 

I numeri in. virgola mobile costituiscono una forma di approssimazione 
dei numeri reali della matematica. 


SE. .. 

ALLORA... 

in un'espressione nu¬ 
merica, un<T o più 
operandi sono in vir¬ 
gola mobile 

il calcolo è approssimato e si può perdere in 
precisione. In questo caso non si tiene conto 
delle cifre meno significative e l'ultima cifra 
considerata viene arrotondata. 
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il valore dell'esp¬ 
ressione supera il 
valore massimo, che 
può essere memoriz¬ 
zato nella variabile 
ricevente 

viene visualizzato un messaggio di "Overflow"; 
come risultato viene fornito con il segno 
algebrico corretto l'infinito di macchina, 
dopo di chè l'esecuzione continua 

se viene eseguita 
una divisione per 
zero 

viene visualizzato il messaggio "Division by 
Zero"; come risultato della divisione viene 
fornito l’infinito di macchina con il segno del 
numeratore, dopo di chè l'esecuzione continua. 

il calcolo di un 
elevamento a potenza 
dà luogo ad un va¬ 
lore nullo, elevato 
ad una potenza nega¬ 
tiva 

viene visualizzato il messaggio "Division by 
Zero"; come risultato dell'elevamento a potenza 
viene fornito l'infinito di macchina, con segno 
positivo dopodiché l'esecuzione continua. 

il valore dell'esp¬ 
ressione è minore 
del più piccolo va¬ 
lore rappresentabile 

il valore diviene zero (Underflow) dopo di chè 
l'esecuzione continua. 

in un'assegnazione 
numerica, il tipo 
dell'espressione è 
diverso dal tipo 
della variabile ri¬ 
cevente 

il tipo dell'espressione viene, automaticamente, 
convertito al tipo della variabile ricevente. 


Nota : L'irtifinto di macchina viene visualizzato come 3.40282E+38. 

1 > 

V 

Valori non Definiti 

Qualora in una espressione numerica una variabile numerica non sia 
ancora stata inizializzata, essa viene inizializzata al valore zero. 


For»e Indeterminate 

Lo svolgimento di un'espressione numerica può sfociare in una forma 
indeterminata del tipo: 


6-8 


LINGUAGGIO BASIC - MANUALE GENERALE 


ESPRESSIONI 


0/0: viene visualizzato il messaggio "Division by Zero" e viene fornito 
il valore 3.40282E+38 (infinito di macchina). 

0A0: si assume un valore uguale ad 1. 


ESPRESSIONI STRINGA 


11 linguaggio BASIC consente l'utilizzazione di espressioni stringa, che 
per molti versi, sono analoghe alle espressioni numeriche appena 
esaminate. Una espressione stringa può essere o una costante stringa, o 
una variabile semplice stringa, o un elemento di una matrice stringa, 
una funzione stringa o una concatenazione degli elementi suddetti 
mediante l'utilizzazione del segno di addizione (+). 

Utilizzando questo segno, le stringhe possono essere "concatenate". Qui 
di seguito, vengono mostrati alcuni esempi di espressioni stringa usate 
nell'ambito di un'istruzione LET. 

50 LET A$ = "Chicago," 

90 B$ = "IL.,". 

100 N$ = A$+B$+"USA" 

Se queste istruzioni si trovano nell'ambito dello stesso programma, la 
concatenazione, contenuta nell'istruzione 100, fa si che ad N$ venga 
assegnata la stringa 

Chicago,IL.,USA 

La lunghezza di una stringa risultante da una concatenazione di una o 
più stringhe è uguale alla somma della lunghezza delle singole stringhe. 
Lo svolgimento dell'espressione procede da sinistra verso destra. 


Si deve evitare di assegnare più di 255 caratteri ad una variabile 
stringa, altrimenti il sistema evidenzierà il messaggio d'errore: 

String too long 


Nota 

L'operando di una stringa che compare in una espressione stringa può 
essere la stringa nulla La stringa nulla può anche essere il 

valore di default di una variabile stringa non inizializzata. 
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Una espressione di confronto paragona due espressioni numeriche o 
stringa mediante l'uso di operatori di confronto. 


Operatori di Confronto 

Gli operatori di confronto, elencati qui di seguito, sono: 

= uguale (il segno di uguale viene anche utilizzato per 

assegnare un valore ad una variabile, vedere 
l'istruzione LET) 

> maggiore di 

< minore di 

>= oppure = > maggiore di o uguale 

< = oppure = < minore di o uguale 

<> oppure >< non uguale 

Non è consentito confrontare una espressione numerica con una espres¬ 
sione stringa e viceversa. Ad esempio: 

A + 8>C è valido 

C + D>=E + F è valido 
A$ = B$ è valido 

S$ > C1 non è valido, se CI è una variabile numerica. 

11 confronto tra numeri ha un significato ovvio. E' anche possibile il 
confronto di stringhe di caratteri. Esso dipenderà dal valore numerico 
della rappresentazione del carattere (che viene stabilita in base al 
valore decimale ASCII di ogni carattere nell'ambito di una stringa). 

11 confronto delle stringhe viene effettuato da sinistra verso destra. 

Innanzi tutto vengono svolte le espressioni numeriche o stringa, poi 
vengono applicati gli operatori di confronto ai risultati di tali 
espressioni. 
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Ad esempio, lo scrivere 
A>B + C 

è equivalente allo scrivere 
A >(B + C) 

L'espressione di confronto fornisce un risultato numerico. Esso può 
essere -1 (se il confronto è vero) oppure 0 (se invece è falso). 


Eseapi 

Consideriamo alcuni esempi, che prevedono l'uso di espressioni di 
confronto. Assegniamo, innanzi tutto, dei valori alle variabili X ed Y. 


VIDEO 

COMMENTI 

X=1 

Il BASIC esegue le assegnazioni specificate 

Ok 


Y=2 


Ok 


?X>Y 

Il BASIC visualizza 0 (cioè falso), poiché X non 

0 

è maggiore di Y 

Ok 


?X<>Y 

11 BASIC visualizza -1 (cioè vero), poiché X è 

-1 

diverso da Y 

Ok 


?S1N(X)<0 

11 BASIC visualizza 0 (cioè falso), poiché 

0 

S1N(X) è positivo 

Ok 


?X MOD Y=1 

11 BA51C visualizza -1 (cioè vero), poiché X MOD 

-1 

Y è uguale ad 1 

Ok 


?"T0KY0"> "FRANKFURT" 

Il BASIC visualizza -1 (cioè vero), poiché TOKYO 

-1 

è maggiore di FRANKFURT (cioè segue FRANKFURT 

Ok 

nell'ordine alfabetico) 
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. ?"TOKYO”>"TOKYOI 
0 
Ok 


11 BASIC visualizza 0 (cioè falso), poiché TOKYO 
è inferiore a TOKYOI. Quando due stringhe sono 
di diversa lunghezza e la più corta è identica 
alla prima parte di quella più lunga allora 
quest'ultima è considerata maggiore 


L'uso di Espressioni di Confronto 

Il risultato di una espressione di confronto può essere utilizzato per 
prendere una decisione a proposito di un flusso di programma. E' 
possibile usare le espressioni di confronto nell'ambito delle seguenti 
istruzioni di controllo: 

- 1F... GOTO...ELSE, oppure 

- 1F. . .THEN...ELSE, oppure 

- WHILE 

dove viene controllata una condizione al fine di determinare le 
successive operazioni del programma (vedere il Capitolo 8). 

La condizione può consistere in una espressione numerica, di confronto o 
logica. 11 BASIC determina se la condizione (dopo IF oppure WHILE) è 
vera o falsa controllando bit per bit il risultato dell'espressione per 
verificare se sia uguale a zero o meno. Un risultato diverso da zero è 
assunto come valido, mentre lo zero viene considerato falso. 

Ad esempio, la seguente istruzione: 

100 IF A$ > B$ THEN 50 

trasferisce il controllo dell'esecuzione all'istruzione 50 se la 
condizione (A$>B$) è vera. 5e invece la condizione è falsa (e cioè A$ 
non è maggiore di B$) viene eseguita l'istruzione successiva. 


ESPRESSIONI LOGICHE 


Un'espressione logica è formata da un operando preceduto dall'operatore 
logico NOT, oppure da due operandi separati da un altro operatore logico 
(AND, OR, XOR, EQV, e 1MP) o da due operandi separati da un operatore 
logico e da NOT. 
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Gli operandi in un'espressione logica possono essere espressioni 
•numeriche o di confronto. Entrambe forniscono un risultato numerico. 

11 risultato di un'espressione logica è anch'esso numerico: è un valore 
intero con qualsiasi combinazione di bit nell'intervallo da -32768 a 
32767. 

Di seguito sono presentati alcuni esempi di espressioni logiche. 

è valido 
è valido 
è valido 
è valido 

non è valido (poiché gli operandi sono stringhe). 


NOT X 
X AND Y 
A>8 OR OD 
1% AND A$< B$ 
A$ XOR B$ 


Operatori Logici 

Gli operatori logici convertono i loro operandi in stringhe di 16 bit, 
con segno, usando la rappresentazione intera complemento a due 
nell'intervallo da -32768 a +32767. Quando gli operandi si trovano fuori 
da questo intervallo si verificherà un errore. Se entrambi gli operandi 
consistono in 0 oppure -1 gli operatori logici forniranno i risultati di 
0 oppure -1. 

L'operazione data viene svolta su questi numeri interi dove ogni bit del 
risultato è determinato dai bit corrispondenti dei due operandi. 

Gli operatori logici sono elencati nella tabella qui di seguito, 
denominata "tabella della verità". Descrive graficamente i risultati 
delle operazioni logiche su ogni bit degli operandi. Ogni possibile 
combinazione di bit è inclusa nella tabella. 

Si noti che i due operatori XOR ed EQV sono l'uno l’esatto contrario 
dell'altro. 


■ 

NOT A 

D 

B 

A AND B 

A OR B 

A XOR B 

A EQV B 

A IMP B 

1 

0 

i 

1 

1 

1 

0 

1 

1 

0 

1 

i 


0 

1 

1 

0 

0 



0 


0 

1 

1 

0 

1 



0 


0 

0 

0 

1 

1 
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Livello di Priorità degli Operatori Logici 

Nello svolgimento di un'espressione vengono prima eseguite le operazioni 
numeriche e di confronto, e successivamente quelle logiche. 

La tabella che segue riporta gli operatori logici nell'ordine di priori¬ 
tà in cui essi vengono svolti dal linguaggio BASIC. 


OPERATORI 

LIVELLO DI PRIORITÀ' 

NOT 

IL PIU' ALTO 

AND 


OR 


XOR 


1MP 


EQV 

IL PIU’ BASSO 


Esempi 

Consideriamo alcuni esempi. Prima di tutto assegneremo dei valori alle 
variabili X, Y e Z. 


VIDEO 

COMMENTI 

X%=0 

il BASIC esegue le assegnazioni 

Ok 

indicate 

Y%=3 


Ok 


Z%=5 


Ok 


? X% < Y% AND Z%=3 

il risultato è falso (0), poiché 

0 

X%< Y% è vero (-1) ma Z%=3 è 

Ok 

falso (0) 

?X% OR X% < 1 % 

il risultato è vero (-1), poiché 

-1 

X% è falso (0) ma X%<Z% è vero 

Ok 

(-1) 
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ESPRESSIONI 


?63 ANO 16 

16 

OK 

•il risultato è 16, poiché 

63 = 111111 (in binario) 

16 = 010000 (in binario) 

010000 

?4 OR 2 

6 

il risultato è 6, poiché 

Ok 

4 = 100 (in binario) 

2 = 010 (in binario) 

110 

?-1 OR -2 
-1 

il risultato è -1, poiché 

Ok 

-1 = 1111111111111111 (in binario) 

-2 = 1111111111111110 (in binario) 


1111111111111111 

?0 < 2 AND 4=4 
-1 

il risultato è vero (-1), poiché 

Ok 

0 < 2 è vero (-1), e 

4=4 è vero (-1) 

?0 XOR Y%=3 
-1 

il risultato è vero (-1), poiché 

Ok 

0 è falso (0), e 

Y%=3 è vero (-1) 

?Z% > Y% AND NOT "A">"B" 

-1 

il risultato è vero (-1), poiché 

Ok 

Z%>Y% è vero (-1 ), e 
"A">"B" è falso (0) 

Nota: E' possibile scrivere due 
operatori di seguito solo a con¬ 
dizione che il secondo non sia un 
operatore NOT. 


Uso delle Espressioni Logiche 

Le espressioni logiche possono essere usate per: 

- controllare una condizione nelle seguenti istruzioni di controllo: 
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trasferirà il controllo dell'esecuzione all'istruzione 300 se la con¬ 
dizione (A$> B$ AND B<=C) è vera (cioè A$ maggiore di B$ e B minore o 
uguale di C). Se la condizione è falsa (cioè A$ minore di B$ o B 
maggiore di C) verrà eseguita l'istruzione successiva. 

- controllare parole (16 bit) per una particolare configurazione di bit. 
Ad esempio, l'operatore AND può essere usato per "mascherare" tutti i 
bit eccetto uno di una status word (parola di stato) associata a un 
buffer di 1/0. L'operatore OR può essere usato per fare il "merge" di 
due parole in modo da creare un determinato valore binario, ad 
esempio: 

1 AND 8 è 8 
1 OR 8 è -1 

poiché 

-1 = 1111111111111111 (in binario) 

8 = 0000000000001000 (in binario) 


LIVELLO DI PRIORITÀ’ DEGLI OPERATORI 


La seguente tabella elenca tutti gli operatori (numerici, stringa, di 
confronto e logici) nell'ordine di priorità con cui essi vengono 
eseguiti nel linguaggio BA51C. 


OPERATORI 

LIVELLO DI PRIORITÀ’ 

A (elevamento a potenza) 

(cambiamento di segno) 

* / (moltiplicazione e divisione) 

IL PIU' ALTO 


6-16 


LINGUAGGIO BASIC - MANUALE GENERALE 






ESPRESSIONI 


\ 

(divisione tra interi) 

MOD 

(divisione modulo) 

+ 

(addizione e sottrazione) 

+ 

(concatenazione di stringa) 

Tutti gli 

operatori di confronto 

NOT 


AND 


OR 


XOR 


1MP 


EQV 




Note 

- gli operatori inclusi nella stessa linea hanno lo stesso livello di 
priorità 

- tutti gli operatori di confronto hanno lo stesso livello di priorità 

- l'ordine di svolgimento delle espressioni può essere modificato me¬ 
diante l'uso di parentesi. Ad esempio, l'ordine di svolgimento di: 

NOT A>B AND OD OR E >F 

è diverso da quello di: 

NOT (A>8 AND (OD OR E>F)) 

se ad esempio, A > B è vero, C > 0 è falso ed E >F è vero, la prima 
espressione è vera, mentre la seconda è falsa. 

- il risultato di una qualsiasi espressione può anche essere un operando, 
così si possono formare espressioni molto complesse, ad esempio 
concatenando due o più espressioni logiche con un operatore logico 
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( come nell'esempio di sopra). Comunque, non è buona norma 
programmazione scrivere espressioni troppo complesse. 


di 
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7. COME VENGONO EMESSI I DATI IN BASIC 



SOMMARIO 


Abbiamo appena analizzato come introdurre dati nell'M20 e come elaborar¬ 
li. 

Questo capitolo si propone di illustrare come definire l'ampiezza della 
linea dello schermo e/o della stampante (comando W1DTH) e come ottenere 
i risultati elaborati dal computer. Esamineremo le istruzioni LPRINT, 
PRINT, LPRINT USING e PRINT US1NG. Esse consentono di stampare/visualiz¬ 
zare i dati in formato standard o in formato definito dall'utente. 


INDICE 


DEFINIZIONE DEL NUMERO DI 7-1 

NULL E DELL'AMPIEZZA DELLA 
LINEA DI OUTPUT 

NULL (PROGRAMMA/IMMEDIATO) 7-1 

WIDTH (PROGRAMMA/IMMEDIATO) 7-2 

FORMATO STANDARD 7-3 

LPRINT/PR1NT (PROGRAMMA/ 7-4 

IMMEDIATO) 

WRITE (PROGRAMMA/IMMEDIAT0) 7-10 


FORMATO DEFINITO DALL'UTENTE 7-12 

LPRINT USING/PR1NT USING 7-12 

(PROGRAMMA/IMMEDIATO) 
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LA DEFINIZIONE DEL NUMERO DI NULL E DELL»AMPIEZZA DELLA LINEA DI OUTPUT 

Le istruzioni NULL e W1DTH, che possono anche essere utilizzate in un 
programma, consentono di stabilire rispettivamente il numero di nulli 
stampati dopo ogni linea e l'ampiezza massima della linea del video e 
della stampante. 


NULL (PROGRAMMA/IMMEDIATO) 

Stabilisce il numero di nuli che devono essere stampati alla fine di 
ogni linea e ritarda la stampa della riga successiva. 


NULL 


\ , 

numeric 


ì * 

expression 



Sintassi 7-1 Comando NULL 


Eseapio 


SE l'utente imposta. 


ALLORA... 


NULL 2 


alla fine di ogni 
stampati 2 nuli 


linea saranno 


Nota : L'espressione numerica viene 
arrotondata al numero intero più 
vicino. 

Nel caso di nastri perforati a 10 
caratteri per secondo, il valore 
dell'espressione dovrebbe essere 
>=3. Ciò consente anche di iden¬ 
tificare le linee sul nastro. 
Quando i nastri non sono perforati 
il valore dovrebbe essere 0 oppure 
1 nel caso di telescriventi tele- 
type o CRT teletype compatible. Il 
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valore dovrebbe essere uguale a 2 
oppure a 3 per stampanti hard-copy 
da 30 caratteri per secondo. 


W1DTH (PR0GRAMMA/1MMEDIAT0) 


Definisce l'ampiezza massima della linea del video o della stampante. 





1 


u 

numeric 


'l 

expression 



. 



Sintassi 7-2 Comando W1DTH 


Valore di Default 

Quando non si usa il comando WIDTH il sistema assume un'ampiezza di 
linea dello schermo di 64 caratteri. 

Allo stesso modo, se non si usa il comando WIDTH LPR1NT, il sistema 
assume un'ampiezza di linea della stampante di 132 caratteri. 


Esempio 

10 PRINT "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 
RUN 

ABCDEFGHIJKLMNOPQRSTUVWXYZ 

OK 

WIDTH 18 

OK 

RUN 

ABCDEFGH1JKLMN0PQR 

STUVWXYZ 

OK 
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Caratteristiche 


SE. .. 


ALLORA... 


si omette l'opzione 
LPR1NT 


si definisce l'ampiezza della linea del video 


si fa uso del co¬ 
mando LPR1NT 


si definisce l'ampiezza della linea di stampa. 

Per esempio: 

10 W1DTH LPR1NT 4 
20 LPR1NT "AAAABBBBCC" 

RUN 

Ok 


AAAA 
BBB8 
CC 


il valore dell'espres¬ 
sione numerica non è 
un numero intero 


viene arrotondato all’intero più vicino e deve 
avere un valore compreso tra 15 e 255. 

Se il valore arrotondato è 'superiore a 255, 
l'ampiezza della linea è "infinita" e cioè il 
BASIC non esegue il ritorno a capo. Nondimeno la 
posizione del cursore e della testina stampante 
determinata dalle funzioni POS e LPOS ritorna a 
zero quando si supera la posizione 255. 


FORMATO STANDARD 

Le istruzioni PR1NT, WRITE e LPR1NT consentono di visualizzare (PR1NT e 
WRITE) oppure stampare (LPR1NT) i risultati dei calcoli in un formato 
standard. Esse sono importanti istruzioni di programma, ma possono anche 
essere usate come istruzioni immediate. 

Se si desidera includere in una linea i risultati di due o più espres¬ 
sioni, queste ultime devono essere separate da una virgola (WRITE), da 
una virgola o da un punto e virgola (PR1NT, LPR1NT). 
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Con l'istruzione WRITE i dati visualizzati verranno separati, l'uno 
dall'altro, da una virgola, mentre le stringhe saranno delimitate da 
virgolette. Con le istruzioni PR1NT e LPR1NT, l'uso della virgola 
"separa” i risultati (mediante l'introduzione di spazi), mentre il punto 
e virgola li "ravvicina” e le stringhe non saranno più delimitate da 
virgolette. 

LPR1NT/PR1NT (PROGRAMMA/IMMEDIATO) 


Le istruzioni LPR1NT e PR1NT consentono rispettivamente di stampare e 
visualizzare i dati secondo un formato standard. 

E' possibile usare un punto interrogativo (?) al posto dell’istruzione 
PR1NT. 



Sintassi 7-3 Istruzione LPRINT 
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Sintassi 7-4 Istruzione PRINT 


Caratteristiche 


SE. 


ALLORA... 


l'istruzione LPRINT 
(oppure PRINT) non 
termina con una 
virgola o un punto 
e virgola 


quando l'istruzione viene eseguita, viene gene¬ 
rata una successiva linea di dati. 

Ad esempio: 

LIST 

10 PRINT 1 
20 PRINT 2 
OK 
RUN 
1 
2 
Ok 


1 'istruzione LPRINT 
(oppure PRINT) non 
contiene alcuna e- 
spressione 


viene saltata una linea, consentendo in questo 
modo di generare spazi tra linee di dati. 

Ad esempio: 

LIST 

10 PRINT 1 
20 PRINT 
30 PRINT 2 
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le espressioni nella 
lista di output sono 
separate da una vir¬ 
gola 


la lista della es¬ 
pressioni contiene 
molti dati 


Ok 

RUN 

1 

2 

Ok 


ogni valore viene stampato (o visualizzato) 
giustificato a sinistra in una delle "zone" di 
stampa in cui ogni linea è divisa (ogni zona è 
composta da 14 posizioni). 

Ad esempio: 

LIST 

10 A$ = "For June..." 

20 X = .353 

30 PRINT "Results", A$, x 

Ok 

RUN 

Results For June... .353 

Ok 


Nota: Ad ogni valore positivo (in questo caso 
.353) viene anteposto uno spazio (vedere in 
seguito). 

Si noti anche che il numero delle zone di stampa 
dipende dal numero massimo di caratteri che può 
contenere. Ciò può essere stabilito mediante il 
comando WIDTH (vedere in seguito) o assunto per 
default. 

1 valori stringa visualizzati (o stampati con 

LPRINT) non sono delimitati da virgolette. 

possono essere generate due o più linee di dati. 

Ad esempio: 

WIDTH 31 
Ok 

PRINT 1, 1+2, 2+3, 7, 9, "ABCD" 

1 3 

5 7 

9 ABCD 

Ok 
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un'istruzione LPR1NT 
(oppure PR1NT) con¬ 
tiene una o più e- 
spressioni numeriche 


l'ultima espressione 
della lista è seguita 
da una virgola 


Nota : Ad ogni valore positivo viene anteposto 
uno spazio (vedere seguito) 


- ad ogni valore stampato o visualizzato viene 
aggiunto in coda uno spazio 

- ad ogni valore positivo è anteposto uno spazio 

- ad ogni valore negativo viene anteposto il 
segno meno 

- ogni valore in semplice precisione viene 
rappresentato in formato a virgola fissa se la 
rappresentazione in tale formato può avvenire 
con 6 oppure meno di 6 cifre con la stessa 
accuratezza del formato a virgola mobile (o 
esponenziale) 

- ogni valore in doppia precisione viene rappre¬ 
sentato in formato a virgola fissa se la 
rappresentazione in tale formato può avvenire 
con 15 oppure meno di 15 cifre con la stessa 
accuratezza del formato a virgola mobile (o 
esponenziale) 

Ad esempio: 

PRINT 10A-6 
. 000001 
Ok 

PRINT 10A-7 
1 E—07 
Ok 

PRINT 1D-15, 1D-16 
.000000000000001 1D-16 

Ok 

Nota : il secondo valore viene visualizzato 
allineato a sinistra nella terza zona di stampa 
poiché il primo valore supera l'ampiezza della 
prima zona di stampa 


una successiva operazione di PRINT (LPR1NT) o 
INPUT visualizza o stampa il successivo caratte¬ 
re o cifra nella stessa linea (all'inizio della 
successiva zona di stampa). Sempre che ci sia 
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l'ultima espressione 
della lista è seguita 
da un punto e virgola 


si inseriscono più 
virgole in successione 


spazio sufficiente, in caso contrario, esso sarà 
stampato o visualizzato nella linea successiva. 

Ad esempio: 

LIST 

10 A$ = "For July... " 

20 X = .491 

30 PR1NT "Results", A$, 

40 PR1NT X 

Ok 

RUN 

Results For July... .491 


una successiva operazione di PRINT/LPR1NT o 
INPUT visualizza o stampa il successivo caratte¬ 
re o cifra nella stessa linea iniziando dalla 
posizione del cursore {o della testina di 
stampa) sempre che ci sia spazio sufficiente 
sulla linea. In caso contrario, esso sarà 
visualizzato/stampato nella linea successiva. 

Ad esempio: 

LIST 

10 INPUT X 

20 PRINT X "SQUARED 1S" X A 2 "AND"; 

30 PRINT X "CUBED IS" X A 3 

40 PRINT 

50 GOTO 10 

Ok 

RUN 

? 9 

9 SQUARED IS 31 AND 9 CUBED IS 729 
? 21 

21 SQUARED IS 441 AND 21 CUBED IS 9261 


l'uso di ogni virgola fa sì che la testina di 
stampa o il cursore si posizioni all'inizio 
della successiva zona di stampa. 

L'uso delle virgole consente quindi di ottenere 

► 
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si usano punti e 
virgola o spazi al 
posto delle virgole 
per separare le 
espressioni della 
lista 


una ampia spaziatura nella visualizzazione o 
stampa dei dati. 

Ad esempio: 

PR1NT "M",,"N" 

M N 

Ok 


la spaziatura dei valori visualizzati o stampati 
è più compattata. L'esatta spaziatura dipende 
dal numero di cifre o caratteri di ogni valore. 
L'uso di punti e virgola consente quindi di 
stampare o visualizzare un numero maggiore di 
valori in ogni linea. 

L'introduzione di più di uno spazio (o punto e 
virgola) tra due espressioni, avrà lo stesso 
effetto dell'introduzione di un solo spazio (o 
di un solo punto e virgola). 

Ad esempio: 

LIST 

10 Al = 1000 
20 A2 = 2000 
30 A3 = 3000 
40 A4 = 4000 
50 A5 = 5000 
60 A6 = 6000 
70 A7 = -7000 

80 PRINT Al;A2; A3 ; A4 ; ;A5 A6 A7 

Ok 

RUN 

1000 2000 3000 4000 5000 6000 -7000 

Gli spazi, che compaiono tra i numeri, sono 
dovuti al fatto che il sistema aggiunge uno 
spazio dopo ogni numero ed elimina il seguo 
implicito "più" che precede ogni valore positi¬ 
vo, sostituendolo con uno spazio. 
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si introducono con¬ 
temporaneamente vir¬ 
gole e punti e vir¬ 
gole nella stessa 
istruzione LPR1NT 
(oppure PRINT) 


è possibile identificare ogni risultato e 
ottenere una spaziatura appropriata nell'ambito 
di una linea. 

Ad esempio: 

| LIST 

10 INPUT "Base e Altezza”; B,H 
20 PRINT "Area=";B*H,"Base=";B,"Altezza=";H 
30 GOTO 10 
I Ok 
RUN 

Base e Altezza? 1.2,3 

Area= 3.6 Base= 1.2 Altezza= 3 

Base e Altezza? A C 

Break in 10 

Ok 


si usa la funzione 
speciale di sistema 
TAB 


si determina l'esatta posizione sulla linea in 
cui si dovrà posizionare la testina di stampa (o 
il cursore) per iniziare la stampa o la 
visualizzazione dei dati. 


Ad esempio: 

PRINT 1 ; TAB(6 ); 2 
1 2 
Ok 


si usa la funzione 
speciale di sistema 
SPC 


viene inserito il numero specificato di spazi 
sulla linea. (Nel calcolare il numero di spazi 
desiderati, bisogna tener conto che i dati 
numerici sono sempre seguiti da uno spazio). 


Ad esempio: 

PRINT 1 ; SPC(6); 2 
1 2 
Ok 


URITE (PROGRAMMA/IMMEDIATO) 

Visualizza una lista di dati. Ogni elemento visualizzato è separato dal 
precedente da una virgola. Le stringhe sono delimitate da virgolette 
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("). Il BASIC esegue un ritorno a capo/interlinea dopo la visualizzazio¬ 
ne dell'ultimo dato. 



Sintassi 7-5 Istruzione WRITE 


Dove 

le espressioni possono essere numeriche, di confronto, logiche o 
stringa. Se non si indica una espressione, l'istruzione URITE esegue una 
interlinea. 


Eseapio 
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FORMATO DEFINITO DALL’UTENTE 


Come abbiamo già visto, l'uso di virgole, punti e virgola, stringhe tra 
virgolette e delle funzioni SPC e TAB consente un controllo limitato del 
formato dei dati stampati o visualizzati. Le istruzioni LPR1NT US1NG e 
PR1NT USING consentono invece di avere un completo controllo del formato 
dei dati stampati o visualizzati. 

Generalmente tali istruzioni sono utilizzate in un programma ma possono 
anche essere usate come istruzioni immediate. 

LPR1NT USING/PRINT USING (PR0GRAMMA/IMMED1AT0) 

Le istruzioni LPR1NT USING e PRINT USING consentono rispettivamente di 
stampare e di visualizzare una lista di dati secondo un formato definito 
dall'utente. 

Le espressioni che compaiono in queste istruzioni possono essere sepa¬ 
rate da una virgola (,) o da un punto e virgola (;). Non è rilevante se 
si usa la virgola o il punto e virgola come separatore. 1 valori saranno 
stampati o visualizzati secondo il formato specificato dall'espressione 
stringa che compare dopo USING. Questa espressione può essere una 
costante o una variabile stringa contenente speciali caratteri di 
formattazione. Tali caratteri determinano il campo ed il formato delle 
stringhe o dei numeri stampati visualizzati. 



Sintassi 7-6 Istruzione LPRINT USING 
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Sintassi 7-7 Istruzione PR1NT USING 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

string expression 


stringa di caratteri di formattazione (vedere in 
seguito) o variabile stringa, comprendente una 
stringa di caratteri di formattazione 

expression 


espressione numerica, di confronto, logica o 
stringa che deve essere stampata o visualizzata 


Visualizzazione o stampa di stringhe 

E' possibile usare uno dei tre seguenti caratteri di formato: 


CARATTERE DI 

FORMATO 

1 

SIGNIFICATO 

11 | 11 


Specifica che solo il primo carattere di una 
stringa deve essere stampato o visualizzato. 

Ad esempio: 

LIST 

10 A$="WATCH" 

20 B$= M 0UT" 

30 PR1NT USING M !";A$;B$ 
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"\n spazio\" 


Ok 

RUN 

WO 

Ok 


specifica che 2+n caratteri della stringa devono 
essere stampati o visualizzati. Se le barre 
rovesce non contengono spazi, verranno stampati 
o visualizzati due caratteri. Se contengono uno 
spazio, i caratteri stampati (visualizzati) 
saranno tre, e così via. Se la stringa è più 
lunga del campo, i caratteri eccedenti saranno 
ignorati. Se invece il campo è più lungo della 
stringa, la stampa (visualizzazione) della 
stringa inizierà dalla sinistra e sarà completa¬ 
ta con spazi sulla destra. 

Ad esempio: 


LIST 

10 A$="100K" 

20 B$="0UT" 

30 PRINT US1NG "\ \";A$;B$ 

40 PRINT US1NG "\ \";A$;B$ 

Ok 
RUN 

L00K0UT 
LOOK OUT 


specifica un campo stringa a lunghezza varia¬ 
bile. Quando il campo viene specificato con 
la stringa verrà stampata esattamente come essa 
viene introdotta. 


Ad esempio: 


LIST 

10 A$="L00K" : B$="0UT" 

20 PRINT USING "!";A$; 

30 PRINT USING 

Ok 

RUN 

LOOK 

OK 
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Visualizzazione e Stampa di Numeri 

E' possibile usare i seguenti caratteri di formato: 


CARATTERE DI 

FORMATO 


SIGNIFICATO 

# 


un simbolo di numero ("number sign") viene usato 
per rappresentare la posizione di ogni cifra. Le 
posizioni di cifra sono sempre sostituite da 
cifre o da spazi. Se le cifre che devono essere 
stampate/visualizzate sono inferiori al numero 
delle posizioni specificate, il numero sarà 
giustificato a destra e sarà preceduto da spazi. 

Ad esempio: 

PRINT USINO "■#### ";99 

99 

Ok 



è possibile inserire un punto decimale in ogni 
posizione del campo. Se la stringa di formato 
indica che una cifra precede il punto decimale, 
tale cifra sarà stampata/visualizzata solo se 
diversa da zero. Quando risulti necessario, i 
numeri sono arrotondati. 

Ad esempio: 

PRINT USING ” ###. ##”;78 
• 78 . 

Ok 

PRINT USING " UH • ## ”;987.654 

987.65 

Ok 

PRINT USING " U . HH ";10.,5.3,66.789,.234 

10.00 5.30 66.79 .23 

Ok 

Nell'ultimo esempio, alla fine della stringa di 
formato sono stati inseriti tre spazi per 
separare i valori visualizzati nella linea 

ì 
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un segno più all'inizio o alla fine della 
stringa di formato farà sì che il segno del 
numero (più o meno) venga visualizzato/stampato 
prima o dopo il numero. 

Ad esempio: 

PRINT USING "+##.## ";-68.95,2.4,55.69 

| -68.95 +2.40 +55.60 -.90 

Ok 

Nota: Per la sola visualizzazione del segno meno 
(e non del segno più) si dovrà iniziare la 
stringa di formattazione inserendo un simbolo di 
numero (#) in più. 

Ad esempio: 

PRINT USING " ###.## ",--68.95,68.95 
-68.95 68.95 

un segno meno alla fine del campo di formato 
farà sì che i numeri negativi stampati/visua¬ 
lizzati siano seguiti dal segno meno. 

Ad esempio: 

PRINT USING " UU .Un- " ;-68.95,22.449,-7.01 
68.95- 22.45 7.01- 

Ok 

un doppio asterisco all'inizio della stringa di 
formato fa sì che gli spazi iniziali di un campo 
numerico siano occupati da asterischi. 11 
simbolo ** indica anche due ulteriori posizioni 
di cifra. 

Ad esempio: 

PRINT USING "**#.# ”;12.39,-0.9,765.1 

*12.4 **-.9 765.1 

Ok 
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$$ 


Un doppio segno di dollaro fa sì che un segno di 
dollaro compaia alla immediata sinistra del 
numero formattato. 11 segno $$ specifica due 
ulteriori posizioni di cifre, una delle quali è 
occupata dal segno di $. Il carattere $$ non può 
essere usato con il formato esponenziale o con 
numeri negativi a meno che il segno meno non 
segua il numero alla destra. 

Ad esempio: 

PR1NT US1NG "$$ ###.##";456.78 
$456.78 
Ok 




il segno **$ situato all'inizio di una stringa 
di formato combina gli effetti dei due simboli 
appena descritti. Gli spazi iniziali saranno 
occupati da asterischi, ed un segno di $ verrà 
inserito immediatamente prima del numero. Il 
simbolo **$ specifica quindi tre ulteriori 
posizioni di cifra, una delle quali è occupata 
dal segno di $. 

Ad esempio: 


PRINT USING "**$ fff/. u ";2.34 

***$2.34 

Ok 


una virgola collocata alla sinistra del punto 
decimale in una stringa di formato fa sì che una 
virgola venga visualizzata/stampata alla sini¬ 
stra di ogni terza cifra nell'ambito della parte 
intera del numero. Una virgola situata alla fine 
della stringa di formato viene visualizza¬ 
ta/stampata come parte della stringa. Il simbolo 
della virgola specifica un'altra posizione di 
cifra. L'inserimento della virgola non esercita 
alcun effetto nell'ambito di un formato esponen¬ 
ziale ( A A A A ). 


► 
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Ad esempio: 


PRINT USING " ####,. ##"; 1234.5 

1,234.50 

Ok 

PRINT USING " UUUU . Un ,";1234.5 
1234.50, 

Ok 

il formato esponenziale può essere specificato 
inserendo quattro simboli dell'esponente dopo i 
caratteri che specificano la posizione delle 
cifre. Tali simboli permettono di generare lo 
spazio per la visualizzazione/stampa di E+xx. E' 
possibile specificare qualsiasi posizione del 
punto decimale. 

Le cifre significative sono giustificate a 
sinistra e l'esponente viene modificato in 
consequenza. A meno che venga specificato un 
segno iniziale di + oppure un segno finale di + 
oppure di - una posizione di cifra verrà 
utilizzata alla sinistra del punto decimale per 
stampare/visualizzare uno spazio oppure un segno 
meno. 

Ad esempio: 

PRINT USING " ##.## aaaa";234.56 
2.35E+02 
Ok 

PRINT USING ### aaaa";888888 
.8889E+06 
Ok 

un segno di sottolineatura incluso nella stringa 
di formato fa sì che il successivo carattere sia 
visualizzato/stampato così come appare nella 
stringa di formato. 

Ad esempio: 

PRINT USING "_! UU . ##_!";12.34 
! 12.34! 

Ok 

► 
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Il carattere visualizzato/stampato così come 
appare nella stringa di formato può consistere 
nello stesso segno di sottolineatura quando si 
include "_" nella stringa di formato. 


se il numero che deve essere stampato/visualiz¬ 
zato è maggiore del campo numerico specificato, 
il segno di percentuale comparirà di fronte al 
numero. Se l'arrotondamento fa sì che il numero 
superi il campo, di fronte ad esso comparirà il 
segno di percentuale. 

Ad esempio: 

PR1NT USING " ## . ## "; 111 .22 
% 111.22 
Ok 

PRINT USING ". ## ";.999 
%1 .00 
Ok 

Se il numero delle cifre specificate è superiore 
a 24, si avrà il messaggio d'errore "Illegal 
Function Cali". 


Nota 

Se in un programma si usa più volte la stessa stringa di formato, sarà 
opportuno assegnare a una variabile stringa dei caratteri di formatta¬ 
zione e quindi specificare il nome della variabile stringa al posto 
della stringa di formato. 
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Per esempio: 


10 A$=" ## . ## " 

20 PRINT USING A$; 8.49 


100 PRINT USING A$;A,B,C 


150 PRINT USING A$;A1,81 
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8. ISTRUZIONI DI CONTROLLO 



SOMMARIO 


Di norma le istruzioni BASIC sono eseguite l’una dopo l'altra nell'or¬ 
dine del numero di linea. A volte però può essere necessario alterare la 
normale sequenza di esecuzione mediante "salti" (branches) che trasferi¬ 
scono il controllo da un'istruzione ad un'altra parte del programma. 

In questo capitolo vedremo come sia possibile conseguire questo 
risultato tramite salti condizionati o incondizionati e tramite cicli 
(loops). 


INDICE 


SALTI (TRASFERIMENTI) 
INCONDIZIONATI 

8-1 

GOTO (PROGRAMMA/1MMED1AT0) 

8-1 

ON...GOTO (PROGRAMMA/IMME¬ 
DIATO) 

8-3 

SALTI (TRASFERIMENTI) 
CONDIZIONATI 

8-4 

IF...GOTO...ELSE/ 

IF...THEN...ELSE 

(PR0GRAMMA/IMMED1AT0) 

8-4 

CICLI ITERATIVI (LOOPS) 

8-9 

FOR/NEXT (PR0GRAMMA/1WE- 
DIATO) 

8-12 

WHILE/WEND (PROGRAMMA/IMME¬ 
DIATO) 
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ISTRUZIONI DI CONTROLLO 


SALTI (TRASFERIMENTI) INCONDIZIONATI 

I trasferimenti di controllo possono essere condizionati o incon¬ 
dizionati. L'istruzione GOTO determina un trasferimento incondizionato 
del controllo dell'esecuzione al numero di linea indicato nell'istruzio¬ 
ne stessa. 11 programma esemplificativo RETTANG0L01 (vedere capitolo 1 e 
2) contiene la seguente istruzione: 

80 GOTO 20 

L'istruzione indica all'M20 che la prossima istruzione che deve essere 
eseguita è la 20 al posto di quella immediatamente successiva di numero 
più elevato. 

L'istruzione ON...GOTO, o istruzione calcolata GOTO, rappresenta 
un'altra forma di trasferimento incondizionato. Essa consente di 
trasferire il controllo ad una istruzione scelta tra n specificate in 
base al valore di una espressione numerica. Ad esempio: 

100 ON A GOTO 15, 30, 500 

Questa istruzione indica: se A=1 il controllo è trasferito all'istru¬ 
zione 15, se A=2 all'istruzione 30, se A=3 all'istruzione 500. Se però 
A<1 oppure A>3 il programma BASIC continua con la prossima istruzione 
eseguibile. 


GOTO (PROGRAMMA/IMMEDIATO) 


Trasferisce il controllo dell'esecuzione alla linea di programma 
specificata. 



Sintassi 8-1 Istruzione GOTO 
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Eseapio: 


VIDEO 


LIST 

10 READ R 
20 PRINT "R =";R, 

30 A = 3.14*RA 2 
40 PRINT "AREA =";A 
50 GOTO 10 
60 DATA 5,7,12 
Ok 
RUN 

R = 5 AREA = 

R = 7 AREA = 

R = 12 AREA = 


COMMENTI 


L'istruzione 50 trasferisce il 
controllo incondizionato all'i¬ 
struzione 10 


78.5 

153.86 

452.16 


Out of data in 10 


Ok 


Caratteristiche 


SE. . 


l'utente imposta: 


GOTO 500 


CR 


in Stato Comandi 
E 

500 è un’istruzione del 
programma residente in 
memoria 


l'istruzione specifi¬ 
cata tramite GOTO 
non è eseguibile (ad 
es. è una istruzione 
REM) 


ALLORA. .. 


GOTO viene usato in alternativa a 
RUN. 

Nota : l'uso dell'istruzione GOTO 
in Stato Comandi fa si che l'ese¬ 
cuzione del programma inizi al 
numero di linea specificato senza 
che venga automaticamente operato 
un CLEAR. Ciò consente di asse¬ 
gnare valori a variabili di pro¬ 
gramma quando si è in Stato 
Comandi. Questa tecnica può essere 
usata in fase di messa a punto 
(debug) del programma. 


il controllo viene trasferito alla 
prima istruzione eseguibile suc¬ 
cessiva 


► 
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ISTRUZIONI DI CONTROLLO 


un'istruzione GOTO 
trova in un ciclo 
(loop) FOR/NEXT 
E 


il valore della variabile di 
controllo (vedere FOR/NEXT) è 
l'ultimo valore assunto nell'ambi¬ 
to del ciclo. 


•trasferisce il control¬ 
lo ad un'istruzione 
esterna al ciclo 


ON...GOTO (PROGRAMMA/1MMEDIATO) 


Trasferisce il controllo dell'esecuzione di un programma ad una linea 
scelta tra un insieme di linee specificate dopo GOTO, in funzione del 
valore assunto da un'espressione specificata dopo ON. 



Sintassi 8-2 Istruzione 0N...G0T0 


Caratteristiche 


SE... 

il programma ha la 
seguente struttura: 

20 INPUT A 

-p30 ON A GOTO 100,200,300 

40 

A=1 

90 


ALLORA. .. 


il valore di A determina a quale 
dei numeri inclusi nella lista 
verrà trasferito il controllo. Se 
ad esempio il valore è uguale a 
tre, il controllo verrà trasferito 
al terzo numero di linea incluso 
nella lista (se il valore di A non 
è un intero, esso verrà arrotonda¬ 
to al valore intero più vicino). 
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100 


TL 


200 


A=3 


-300 


il valore dell'espres¬ 
sione che segue ON è 
uguale a 0 o maggiore 
dei numeri inclusi 
nella lista (ma in¬ 
feriore o uguale a 255) 


il controllo viene trasferito alla 
prima istruzione eseguibile suc¬ 
cessiva 


il valore dell'espres¬ 
sione che segue ON è 
negativo o superiore^ 255 


si ha il messaggio d'errore "Ille- 
gal Function Cali" (Richiamo non 
Lecito di Funzione) 


SALTI (TRASFERIMENTI) CONDIZIONATI 

In alcuni casi si può desiderare di effettuare il trasferimento del 
controllo dell'esecuzione di un programma a parti diverse dello stesso 
programma a seconda che si verifichino condizioni predefinite. Le 
istruzioni IF...GOTO...ELSE e/o 1F...THEN...ELSE possono essere utiliz¬ 
zate per verificare tali condizioni e per decidere come effettuare il 
trasferimento. 


IF...GOTO...ELSE/1F...THEN...ELSE (PROGRAMMA/IMMEDIATO) 


Entrambe le istruzioni effettuano il trasferimento condizionato ad una 
istruzione specificata. 

Come è possibile notare attraverso la sintassi, l'istruzione IF... 
THEN...ELSE è la più potente, poiché consente di introdurre una serie di 
istruzioni sia dopo THEN che dopo ELSE. 
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ISTRUZIONI DI CONTROLLO 



Sintassi 8-3 Istruzione IF.. .GOTO.. .ELSE 



Sintassi 8-4 Istruzione 1F...THEN...ELSE 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


condition 


può essere una espressione: 


- numerica 


- di confronto 

- logica 


Nota : 11 BASIC determina se la condizione è vera 
o falsa controllando se il suo risultato 
(numerico) è diverso da zero (condizione vera) o 
uguale a zero (condizione falsa). Per questo 
motivo è possibile verificare se il valore di 
una variabile è uguale a zero o diverso da zero, 
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specificando semplicemente il nome della varia¬ 
bile come "condizione". 

E' possibile inserire una virgola dopo THEN. 


Caratteristiche 


SE. .. 

ALLORA... 

la condizione è vera 

il controllo viene trasferito 

0 

all'istruzione il cui numero di linea viene 
specificato dopo GOTO (o THEN) 

OPPURE 

alla prima istruzione specificata dopo THEN 

la condizione è falsa 

E SE 

viene omessa la clau¬ 
sola ELSE 

il controllo viene trasferito alla prossima 
istruzione eseguibile che segue l'istruzione 
IF...G0T0 oppure IF...THEN 

la condizione è falsa 

E SE 

la clausola ELSE è 
presente 

il controllo viene trasferito 

0 

all'istruzione il cui numero di linea viene 
specificato dopo ELSE 

OPPURE 

alla prima istruzione specificata che segue 
ELSE. 

Nota: Dopo aver esequito l'istruzione (n le 
istruzioni) che fanno seguito ad ELSE, il 
controllo viene trasferito alla prossima istru¬ 
zione eseguibile 
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ISTRUZIONI DI CONTROLLO 


Esempi 


VIDEO 

COMMENTI 

LIST 

se si introduce 10 la condizione 

10 REM 1F GOTO test program 

dell'istruzione 30 (X%=10) è vera 

20 INPUT X% 

e quindi il controllo viene tra- 

30 1F X% > =10 GOTO 60 

sferito all'istruzione 60. Se si 

40 PR1NT "1F GOTO failed thè test" 

introduce 2 la condizione è falsa 

50 GOTO 99 

e quindi il controllo viene tra- 

60 PRINT "IF GOTO passed thè test" 

sferito all'istruzione 40 

99 GOTO 20 


Ok 


RUN 


? 10 


IF GOTO passed thè test 


? 2 


IF GOTO failed thè test 


? A C 


Break in 20 


Ok 


LIST 

se si introduce 1 , la condizione 

10 INPUT X 

(X=1NT(X)) indicata nell'istruzio- 

20 IF X=INT(X) 

ne 20, è vera e quindi il control- 

THEN PRINT X; "is an integer" 

lo viene trasferito all'istruzione 

ELSE PRINT X; "is not an integer" 

PRINT che segue THEN. Se invece si 

30 IF X=9999 THEN END ELSE 10 

introduce 1.5 la condizione è 

Ok 

falsa ed il controllo è trasferito 

RUN 

all'istruzione PRINT che segue 

? 1 

ELSE. 

1 is an integer 


? 1.5 

Nota: l'istruzione 20 è una sola 

1.5 is not an integer 

linea logica divisa in tre linee 

? A C 

fisiche. 

Break in 10 


Ok 


50 IF 1 THEN A=1000 

il valore 1000 viene assegnato 


alla variabile A se I non è uguale 


a zero 
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70 IF (1< 30) AND (1 >5) THEN 
A=B+C: GOTO 350 
80 PR1NT "OUT OF RANGE" 


si controlla se il valore di I è 
maggiore di 5 e minore di 30. Se I 
si colloca in quest'ambito, si 
calcola il valore della variabile 
A ed il controllo viene poi 
trasferito all'istruzione 350. In 
caso contrario, l'esecuzione con¬ 
tinua con la linea 80 


Istruzioni IF Nidificate (Nested) 

Le istruzioni IF... GOTO...ELSE oppure IF...THEN...ELSE possono essere 
nidificate. Tale processo trova un limite solo nella lunghezza di una 
linea BASIC (255 caratteri). Ad esempio: 


SE... 

ALLORA... 

si digita: 

IF X >Y THEN PRINT "GREATER" 

ELSE IF Y >X THEN PRINT "LESS THAN” 
ELSE PRINT "EQUAL" 

la linea introdotta è una istru¬ 
zione lecita (in questo caso è una 
sola linea logica divisa in tre 
linee fisiche) 

l'istruzione non contiene lo stesso 
numero di clausole ELSE e THEN 

ogni ELSE viene associato con il 
più prossimo THEN non ancora 
associato a una clausola ELSE. Ad 
esempio: 


IF A=B THEN IF B=C THEN 

PRINT "A=C" 

ELSE PRINT "AoC" EJ 


Verrà visualizzato A=C quando A=B 
e B=C, ma non sarà visualizzato 
A< >C quando A< >B. 
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Controllo di un Valore Espresso in Virgola Mobile 


SE. .. 


si utilizza un'istruzione 
IF... GOTO... ELSE, oppure 
IF...THEN...ELSE per con¬ 
trollare il risultato di un 
calcolo in virgola mobile 


ALLORA... 


poiché la rappresentazione interna 
del valore non può essere esatta, 
il controllo viene effettuato 
nell'ambito del grado di accura¬ 
tezza definito. 

Per controllare ad esempio se la 
variabile A è uguale a 1.0 si 
utilizzerà : 

IF ABS(A-1.0)<1.0E-6 GOTO... 
oppure 

IF ABS(A-1.0)<1.0E-6 THEN... 

Questo controllo risulterà vero se 
(il valore di A è uguale ad 1.0 con 
un errore relativo inferiore a 
1.0E-6 


CICLI ITERATIVI (L00PS) 


L esecuzione ripetuta di una serie di istruzioni viene definita con il 

termine di loop (ciclo iterativo). 

Ciò può essere ottenuto mediante le istruzioni: 

- FOR e NEXT, che possono essere usate per racchiudere una serie di 
istruzioni, consentendo di ripeterle un numero specificato di volte 

- WH1LE e WEND, che possono essere usate per racchiudere una serie di 
istruzioni, consentendo di ripeterle finché una determinata condizione 
risulta vera. 
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Come un Loop può Semplificare il Vostro Problema 

Si supponga di voler visualizzare una lista dei numeri da 1 a 25 e 
contemporaneamente della loro radice quadrata. Ciò può essere ottenuto 
con gradi di efficienza via via maggiori. 

11 metodo più primitivo è quello di introdurre le seguenti istruzioni: 

10 PRINT 1,SQR(1 ) 

20 PRINT 2,SQR(2) 

30 PRINT 3,SQR(3) 


e così via, per terminare con: 

240 PRINT 24 , SQR(24) 

250 PRINT 25,SQR(25) 

260 END 

Una soluzione migliore può essere ottenuta mediante l'uso dell'istru¬ 
zione IF...THEN 

10 LET A=1 
20 PRINT-A,SQR(A) 

30 LET A=A+1 

40 1F A <26 THEN 20 

50 END 

E' possibile semplificare ulteriormente il processo usando il loop 
FOR/NEXT 

10 FOR A=1 TO 25 
20 PRINT A,SQR(A) 

30 NEXT A 
40 END 

• 

Quest'ultima semplificazione può sembrare a prima vista di scarso rilie¬ 
vo. Nondimeno le utilizzazioni di questo loop sono sorprendenti così 
come potrà risultare dall'esame di alcune possibilità del suo impiego 
che verranno presentate in seguito. 
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ISTRUZIONI DI CONTROLLO 


L'inizio del Loop - L'istruzione FOR 

Le istruzioni FOR e NEXT identificano rispettivamente l'inizio e la fine 
di un loop. FOR specifica quante volte il loop, e cioè l'istruzione o la 
sequenza delle istruzioni comprese tra FOR e NEXT devono essere 
eseguite. 

Nell'esempio precedente FOR specifica che l'istruzione PRINT deve essere 
eseguita per valori successivi di A compresi tra 1 e 25 (il valore di A 

viene incrementato di 1 dopo l'esecuzione di ogni PRINT). Quando il 

valore di A supera 25, l'esecuzione del loop termina, ed il controllo 
passa alla prima istruzione successiva all'istruzione NEXT. In questo 
caso si tratta dell'istruzione END, che sta ad indicare il completamento 
del programma. 

L indicazione A=1 TO 25 definisce l'assieme dei valori presi in consi¬ 
derazione per eseguire il loop. In questo contesto A è denominata come 
variabile di controllo, poiché controlla quante volte il loop deve 
essere eseguito. La variabile di controllo subisce sempre incrementi 

pari ad 1 , a meno che l’istruzione FOR non specifichi diversamente. E' 
possibile difatti incrementare la variabile di controllo di un valore 
diverso da 1. Ciò si ottiene aggiungendo la clausola STEP. 

Ad esempio: 

10 FOR A=1 TO 25 STEP 2 

Questa istruzione indica che la variabile di controllo subirà un 

incremento (o step) di 2. Il loop verrà quindi eseguito per ogni valore 
dispari di A compreso tra 1 e 25 (e cioè 1,3,5...25). Quando il valore 
di A supera 25 (e cioè quando raggiunge 27) l'esecuzione del loop 
termina. Il valore di A sarà quindi 27 prima che venga eseguita 
l'istruzione che segue l'istruzione NEXT. 

Se si desidera invece eseguire il loop per i valori pari di A compresi 
tra 1 e 25, ciò può essere ottenuto specificando: 

10 FOR A=2 TO 25 STEP 2 

Anche in questo caso quando il valore di A supera 25 (cioè raggiunge 26) 
l'esecuzione del loop termina. 

E' possibile esplicitare, anche se non è necessario, un valore dell'in¬ 
cremento pari a 1. Ad esempio: 

80 FOR X=1 TO 40 STEP 1 
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Come nel caso delle espressioni contenute nelle istruzioni LET e PR1NT i 
parametri dell'istruzione FOR possono essere molto complessi. Ognuna 
delle seguenti istruzioni, ad esempio, è valida: 

70. FOR A=B TO C 

80 FOR X=8/M+N TO A A 2 

50 FOR 1=SQR(A) TO 1550 STEP B*C+6 

Se il valore di un incremento è negativo, il ciclo FOR/NEXT è eseguito 
finché il valore della variabile di controllo non è minore del valore 
finale (cioè il valore espresso dopo la parola TO). 

Ad esempio: 

LIST 

10 FOR K%=1 TO -10 STEP -1 
20 PRINT K%; 

30 NEXT K% 

Ok 

RUN 

10-1_2 -3 -4 -5 -6 -7 -8 -9 -10 

In questo caso il ciclo viene ripetuto 12 volte. 


Il Temine del Ciclo Iterativo - L'istruzione NEXT 

Così come il loop inizia sempre con un'istruzione FOR, esso termina 
sempre con un'istruzione NEXT. Si ricordi che tale ciclo comprende tutte 
le istruzioni incluse tra le istruzioni FOR e NEXT. 

L'istruzione NEXT inizia con la parola chiave NEXT, alla quale può 
seguire una lista di nomi di variabili di controllo. Ogni variabile di 
controllo nell'istruzione NEXT deve avere lo stesso nome della variabile 
di controllo della corrispondente istruzione FOR. Più istruzioni FOR 
possono essere associate a una sola NEXT (si veda in seguito Nested 
Loops (Cicli Nidificati)). 


FOR/NEXT (PROGRAMMA/IMMEDIATO) 


Le istruzioni FOR/NEXT consentono di eseguire in loop una serie di 
istruzioni per un certo numero di volte. 
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Sintassi 8-5 Istruzione FOR 



Sintassi 8-6 Istruzione NEXT 


Dove: 
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initial value 


consiste in un'espres¬ 
sione numerica che spe¬ 
cifica il primo valore 
(cioè il valore inizia¬ 
le) assegnato alla va¬ 
riabile di controllo 
quando si esegue una i- 
struzione FOR 



final value 


consiste in un'espres¬ 
sione numerica che spe¬ 
cifica il valore limite 
della variabile di con¬ 
trollo. Detto valore 
viene confrontato con la 
variabile di controllo 
ogni volta che il cic¬ 
lo viene ripetuto 



increment 


consiste in un'espres¬ 
sione numerica che 
specifica l'incremento 
cioè il valore che 
deve essere aggiunto 
(col suo segno al¬ 
gebrico) alla varia¬ 
bile di controllo ogni 
volta che l'istruzione 
NEXT viene eseguita 


se non 

cata 1 

assume 

di +1. 

viene specifi- 
opzione STEP si 
un incremento 
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ISTRUZIONI DI CONTROLLO 


Funzionamento delle Istruzioni FOR/NEXT 






Figura 8-1 Istruzioni FOR/NEXT 
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SOMMARIO 


Questo capitolo descrive i due tipi di file dati disponibili in BASIC: 

- i file sequenziali (sequential file) 

- i file ad accesso diretto (Random file) 

Esamineremo come questi file vengono creati, aperti, chiusi e come 
sia possibile leggerli e scriverli. 
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CLOSE (PROGRAMMA/IMMEDIATO) 

,12-7 





CVI/CVS/CVD 

12-33 

LETTURA DI UN FILE 




SEQUENZIALE 

12-9 

LOC 

12-34 

INPUT #(PROGRAMMA/IMMEDIATO) 

12-10 

REGISTRAZIONE DI UN RECORD SU 



UN FILE AD ACCESSO DIRETTO 

12-35 

LINE INPUT # 




(PROGRAMMA/IMMEDIATO) 

12-13 

LSET/RSET 




(PROGRAMMA/IMMEDIATO) 

12-36 

SCRITTURA DI UN FILE 




SEQUENZIALE 

12-17 

MKI$/MKS$/MKD$ 

12-39 

PRINT#(PROGRAMMA/IMMEDIATO) 

12-18 

PUT# (PROGRAMMA/IMMEDIATO) 

12-40 

PRINT# USING 


AGGIORNAMENTO DI RECORD DI 


(PROGRAMMA/IMMEDIATO) 

12-23 

UN FILE AD ACCESSO DIRETTO 

12-43 


WR1TE# (PROGRAMMA/IMMEDIATO) 12-24 




ISTRUZIONI DI CONTROLLO 


il valore dell'incremento 
è positivo 

E SE 

il valore iniziale è supe¬ 
riore a quello finale 


il ciclo non viene eseguito. 
Ad esempio: 

LIST 
10 J=0 

20 FOR 1=1 TO J 
30 PR1NT 1 
40 NEXT 1 

50 PR1NT "Exit of thè loop" 

Ok 

RUN 

Exit of thè loop 
Ok 


Incremento di Valore Negativo 


SE. .. 

ALLORA... 

il valore 
negativo 

dell'incremento è 

il ciclo viene eseguito finché il 
valore della variabile di control¬ 
lo non è minore del valore finale. 



Ad esempio: 



LIST 

10 FOR 1%=1 TO -10 STEP -3 

20 PR1NT 1%; 

30 NEXT 1% 

40 PR.1NT "Exit"; 

"CONTROL VAR1ABLE="; 1% 

Ok 

RUN 



1 -2 -5 -8 

Exit CONTROL VAR1ABLE=-11 



In questo caso il ciclo è eseguito 
quattro volte. Quando termina, la 
variabile di controllo mantiene 
l'ultimo valore assunto (-11) che 
viene visualizzato mediante l'i¬ 
struzione 40 



Ad Accesso Diretto 
(o "Record-oriented") 


Un file ad acces¬ 
so diretto è una 
sequenza di dati 
raggruppati in 
record 

Ogni istruzione di 
Input/Output può 
leggere o registra¬ 
re un record alla 
volta 

1 record di un 
file ad accesso 
diretto hanno 
tutti la stessa 
lunghezza e la 
stessa struttura 


Random: 

accesso diretto in let¬ 
tura o registrazione al 
record specificato 


FILE SEQUENZIALI 

1 file sequenziali rappresentano il modo più semplice di memorizzare i 

dati. ‘ 

Conviene utilizzare file sequenziali quando i dati hanno un formato 

libero (cioè non si possono raggruppare in record). 

1 dati vengono scritti su un file sequenziale uno dopo l'altro ( in 

sequenza) e vengono poi letti nello stesso ordine. 

Si tengano presenti i seguenti punti: 

- quando un file sequenziale viene aperto in Output, i dati vengono 

registrati in' sequenza a .partire dall'inizio del file. Se il file 
conteneva in precedenza dei dati, questi vengono persi. 

- quando un file sequenziale viene aperto in Append, i dati vengono 

registrati in sequenza dopo l'ultimo dato sul file 

- per aggiornare un file sequenziale è necessario aprirlo in lettura 

(Input), leggere l'intero file e registrare i dati aggiornati su un 
nuovo file sequenziale aperto in scrittura (Output). 

- i dati scritti su un file sequenziale includono di norma dei delimita¬ 
tori che specificano dove ogni dato inizia e finisce. 

- per leggere un file sequenziale l'utente deve aprirlo in Input e deve 
conoscere il formato dei suoi dati; per esempio se sul file sono 
memorizzati valori numerici separati da spazi o valori numerici e 
stringa separati da virgola. 
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ISTRUZIONI DI CONTROLLO 


Nested Loops (Cicli Nidificati) 

Due o più cicli FOR/NEXT possono essere nidificati a condizione che il 
ciclo FOR/NEXT interno sia intieramente compreso in quello esterno. 1 
seguenti cicli, ad esempio, sono corretti: 


- 50 FOR 1 = 1 TO 10 

i—100 FOR J = 2 TO 20 
>—200 NEXT J 
-300 NEXT 1 


mentre i seguenti non lo sono: 



50 FOR I = 1 TO 
100 FOR J = 2 TO 
150 NEXT 1 
200 NEXT J 


10 

20 


Due o più cicli FOR/NEXT nidificati non devono avere la stessa variabile 
di controllo. 


Ad ogni istruzione FOR deve corrispondere una istruzione NEXT. 

Se i cicli nidificati hanno lo stesso punto finale, si può utilizzare 
per tutti una sola istruzione NEXT con una lista di tutte le variabili 
di controllo. 

Quando si incontra un ciclo nidificato, questo viene eseguito. Alla fine 
dell'esecuzione del ciclo viene eseguita la prima istruzione successiva 
all'istruzione NEXT associata. 

Non c'è limite al numero di cicli interni a un altro ciclo. Il numero di 
loop contemporaneamente attivi è limitato solo dalla quantità di memoria 
disponibile. 


Ad esempio: 

50 FOR 1 = 1 TO 10 


100 FOR J = 2 TO 20 

200 NEXT J, I 
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11 buffer è un'area di transito per i dati che bisogna leggere o scrivere 
su file. 

L'utente deve stabilire la struttura del buffer (cioè dei record nel 
file) fissando la lunghezza (in caratteri) di ogni dato all'interno del 
buffer tramite l'istruzione F1ELD. 

L'istruzione F1EL0 consente di definire la lunghezza (in caratteri) di 
ogni dato all'interno del buffer e la sua posizione; ciò significa 
definire la struttura dei record nel file. L'utente per accedere a un 
dato file con un'istruzione di input/output, farà riferimento al file 
tramite il numero del file e non tramite il suo identificatore. 

Quando l'utente chiude un file, tramite l'istruzione CLOSE, viene 
cancellata l'associazione, fatta dalla OPEN, tra il file e il suo buffer, 
e non è più possibile accedere al file, a meno che non venga aperto di 
nuovo. 

Quando l'utente riapre un file, tramite un'altra OPEN, può associare al 
file lo stesso o un altro buffer. 


OPEN (PROGRAMMA/IMMEDIATO) 

Apre un file dati consentendo l'accesso da programma. 

Se il file non è già stato creato la OPEN crea arche il file (però 
l'utente non può creare un file aprendolo con metodo d’accesso "1") 



Sintassi 12-1 Istruzione OPEN 


Dove 


ELEMENTO SINTATTICO 


SIGNIFICATO 


access mode 


è una costante o una variabile stringa il cui 
valore può essere: 


- "A",cioè Append : predispone la registrazione 
sequenziale dei dati dopo l'ultimo dato. 11 
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ISTRUZIONI DI CONTROLLO 


Note 

- se un'istruzione NEXT viene eseguita prima della corrispondente istru¬ 
zione POR, viene emesso il messaggio di errore: 

NEXT without FOR 

e l'esecuzione del programma viene interrotta. 

Ad esempio: 

1200 1F A > 5 THEN 2010 


2000 FOR J=1 TO 7 
2010 PR1NT "HELLO"; 

2020 NEXT J 

Quando si esegue l'istruzione 2020 a seguito di un salto dall'istru¬ 
zione 1200, il BASIC visualizza il sopracitato messaggio di errore e 
ritorna in Stato Comandi. 

- il valore finale è sempre definito prima di quello iniziale. Se ad 
esempio si introduce: 

10 1=5 

20 FOR 1=1 TO 1+5 

l'istruzione 20 assegnerà il valore 10 al valore finale. Comunque per 
agevolare la leggibilità del programma, non è consigliabile usare la 
variabile di controllo per definire il valore finale. 

- se possibile, è buona norma di programmazione usare una variabile 
intera per la variabile di controllo e costanti (o variabili) intere 
per il valore iniziale e finale e per l'incremento. Ciò ottimizzerà la 
velocità di esecuzione. 


WH1LE/WEND (PROGRAMMA/IMMEDIATO) 


Esegue in ciclo una serie di istruzioni finché una determinata condizio¬ 
ne è vera. 
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Esempi 


VIDEO 


COMMENTI 


50 OPEN "A",1,"VI:EXAMPLE" 


160 OPEN "0",2,"V1:TEST" 


270 OPEN "R",3,"V2:F1",8G 
280 OPEN "R",4,"V2:F2",20 


490 CLOSE 2 

500 OPEN "1",5,"VI:TEST' 


600 OPEN "R",2,F1LES,RN 


L'istruzione 50 apre il file sequenziale 
EXAMPLE residente sul disco VI in Append, e 
associa al file il buffer numero 1. 
L'istruzione 160 apre il file sequenziale 
TEST, residente sul disco VI, in Output e 
associa al file il buffer numero 2. 
L'istruzione 270 apre il file ad accesso 

diretto FI, residente sul disco V2, associa 
al file il buffer numero 3 e stabilisce la 
lunghezza dei record pari a 80 byte. 
L'istruzione 280 apre il file ad accesso 

diretto F2, residente sul disco V2, associa 
al file il buffer numero 4 e stabilisce la 
lunghezza dei record pari a 20 byte. 
L'istruzione 490 chiude il file TEST. 
L'istruzione 500 riapre il file TEST in 
Input e associa al file il buffer numero 5. 
L'istruzione 600 apre un file ad accesso 

diretto il cui identificatore è il contenu¬ 
to della variabile stringa F1LE$. La 
lunghezza dei suoi record è data dal valore 
della variabile numerica RN. Il buffer 

associato è il buffer 2. reso disponibile 
dopo l'istruzione 490. 


Nota: Non è possibile creare un file con un'istruzione OPEN, se viene 
specificato come metodo di accesso ”1". Un eventuale tentativo si 
risolve in un errore per "File not found" 
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ISTRUZIONI DI CONTROLLO 


Funzionaaento delle Istruzioni WH1LE/WEND- 



Figura 8-2 Istruzioni WH1LE/WEND 


Nota 

Un ciclo FOR/NEXT può essere definito "pendente” (pending) se interrotto 
da un "break" prima della sua conclusione. Qualsiasi modifica al 
programma residente (come ad esempio: cancellazione e modifica di linee 
e così via) impedirà la conclusione del ciclo. 

VIDEO COMMENTI 

H 5 j gli elementi della matrice A$ 

90 'BUBBLE SORT ARRAY A$ vengono memorizzati in ordine 

100 FLIPS=1 'FORCE ONE PASS THRU LOOP ascendente (dall'indice 1 al- 
110 WH1LE FL1PS•-4 l'indice J) 

115 FL1PS=0 

120 FOR 1=1 TO J-1 

130 1F AS(1) A$(1+1) THEN 

SWAP A$(l),A$(1+1):FLIPS=1 
140 NEXT 1 
150 WEND 
Ok 
RUN 
Ok 






Caratteristiche 



Note 

E' sempre conveniente chiudere un file quando non si ha più bisogno di 
elaborarlo, a meno di dover concatenare un altro programma al programma 
attuale (tramite CHAIN o RUN con l'opzione R o LOAD con l'opzione R). 
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9. FUNZIONI 



3 L'utente può continuare 

a leggere i dati, cioè 
ripetere il passo 2 per 
un numero arbitrario di 
volte (fino a raggiungere 
la fine del file) 


100 INPUT# 2,X1,X2,X3,X4 


4 


150 INPUT#2,U$ ,W$ 


Quando ha finito di leggere 
i suoi dati, l'utente chiu¬ 
derà il file (a meno che 
non voglia concatenare 
un altro programma che debba 
leggere dati dal file). 


200 CLOSE# 2 


INPUT # (PR0GRAMMA/IMMED1AT0) 

Legge i dati da un file sequenziale e li assegna a variabili di program¬ 
ma . 



Sintassi 12-3 Istruzione INPUT# 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file number 


è un 

dato 

file 

espressione numerica il cui valore arroton- 
specifica il numero del buffer associato al 

- , pp. 
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questo primo carattere la stringa non è compresa tra virgolette e 

non è il carattere termina quando viene incontrata una virgola, 

virgolette (") oppure un ritorno a capo o una interlinea (o 

dopo che sono stati letti 255 caratteri). 

Per esempio, se sul disco sono presenti i 
seguenti dati : 

SUBR0UT1NES, 5OTT0PROGRAMM1 "COME RICHIAMAR¬ 
LI?" 

1 ' istruzione : 

INPUT# 1,R$,S$,T$ 
assegnerà i valori come segue: 

R$ = SUBROUTINES 

S$ = SOTTOPROGRAMMI "COME RICHIAMARLI ?" 

T$ = stringa nulla 

Se invece sul disco fossero presenti i 
seguenti dati : 

SUBROUTINES, SOTTOPROGRAMMI, "COME RICHIAMAR¬ 
LI?" 
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FUNZIONI 


INTRODUZIONE 

Vi sono delle circostanze in cui nell'ambito dello stesso programma si 
deve fare ricorso più volte ad una stessa espressione. 

Per evitare di scrivere tali espressioni più di una volta e per 
risparmiare spazio è possibile definire funzioni e richiamarle in più 
punti. 

L'accesso ad una funzione si può ottenere specificando il suo nome 
seguito, in parentesi, da uno o più argomenti rappresentanti i valori 
sui quali la funzione deve operare. 

Gli argomenti sono separati da virgole. Possono essere costanti, 
variabili o espressioni. 

Una funzione calcola un solo valore che può essere di tipo numerico o 
stringa in funzione del tipo di espressione usata per definire la 
funzione. E' possibile trasferire uno o più argomenti ad una funzione o 
addirittura nessun argomento. 

Nell'ambito della definizione di una funzione il numero degli argomenti 
deve essere uguale a quello dei parametri, così come uguale deve essere 
il loro tipo (numerico o stringa). 

Le conversioni, tra un argomento numerico ed un parametro, sono 
possibili anche se quest'ultimo ha una struttura numerica diversa. 

Ad esempio se si fornisce un valore a virgola mobile nel caso in cui è 
richiesto un intero, il BASIC arrotonderà tale valore all'intero più 
vicino. 

Le funzioni del 1inguaggio BASIC possono essere classificate in due 
categorie principali: 

- Funzioni built-in o dì sistema 

Le funzioni di sistema rappresentano una parte intrinseca del 
linguaggio BASIC, e consentono di effettuare un insieme di operazioni 
di tipo numerico o stringa di uso comune. L'utente può utilizzarle in 
qualunque programma senza dover procedere ad una definizione esplici¬ 
ta. Un elenco completo delle funzioni di sistema corredato da una 
descrizione viene fornito di seguito. • 

- Funzioni definite dall'utente 

Nell'ambito di un programma BASIC l'utente può liberamente definire 
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LINE INPUT. # legge tutti i caratteri del file 
fino a incontrare: 

- un carattere di ritorno a capo, o 

- un carattere di ritorno a capo/interlinea, o 


- la fine del file, o 
mo 

il 254 carattere 
compreso nella stringa) 


- il 254 m ° carattere (questo 254 carattere è 


vengono incontrati 
caratteri iniziali 0 
altri delimitatori - 
virgolette, virgole, 
spazi, e così via 


tutti questi caratteri iniziali 0 tutti questi 
delimitatori vengono inclusi sulla strìnga 


si vuole leggere dati 
senza seguire le nor¬ 
mali restrizioni ri¬ 
guardanti i caratte¬ 
ri iniziali e termi¬ 
nali 


l'utente deve usare istruzioni LINE INPUT# 


si vuole leggere come 
un file dati un 
programma BASIC, in 
formato ASCII 


l'utente deve usare istruzioni LINE INPUT # (è 
possibile registrare programmi che editano altri 
programmi ASCII; rinumerarli, cambiare le istru¬ 
zioni (PR1NT in print, etc...) 


Note 

LINE INPUT # legge tutti i caratteri nel file fino al carattere di 
ritorno a capo. Essa quindi salta la sequenza ritorno a capo/interlinea e 
la successiva LINE INPUT # legge tutti i caratteri fino al prossimo 
ritorno a capo (se viene incontrata la sequenza interlinea/ritorno a 
capo, essa viene considerata come facente parte della variabile stringa) 
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FUNZIONI 


OEF FN (PROGRAW1A/1MMED1ATO) 


DEF FN definisce una funzione di tipo numerico o stringa. 

L'istruzione DEF FN deve essere eseguita prima che la funzione che essa 
definisce possa essere richiamata. 



Sintassi 9-1 Istruzione DEF FN 







- N 

-CD —* 

function 

name 


r* 

argument - 




! 

- 

-o- 

J 


Sintassi 9-2 Richiamo della Funzione 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


function name 


un nome valido di variabile che 
possibile specificare nomi di 
stringa). Non si devono inseri 


inizia con FN 
tipo numerico 
re spazi tra FN 


(è 

o 


il nome della funzione. 


Se il nome della funzione specifica anche un 
tipo, il valore dell3 funzione viene ricondotto 
a quel tipo. _ 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica arrotondata all'intero 
più vicino. Si tratta del numero del buffer 
associato al file 


Esempio 


10 DIM A(50) 

20 OPEN "I",1,"DATAI" 
30 POR K%=0 TO 50 
40 1F EOF(1) THEN 100 
50 INPUT#1 ,A(K%) 

60 NEXT K% 


LOC 

Nel caso di file sequenziale, LOC ritorna il numero di settori (blocchi 
di 256 byte) letti da/registrati su file da quando è stato aperto. 

La funzione LOC può anche essere usata con file ad accesso diretto (vedi 
seguito) 



Sintassi 12-6 Funzione LOC 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file number 


è un'espressione numerica arrotondata all'intero 
più vicino. Si tratta del numero del buffer 
associato al file 
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FUNZIONI 


una funzione definita 
dall'utente viene ri¬ 
chiamata da un'altra 
funzione definita dal- 
1'utente 


la funzione richiamata deve essere 
nell'ambito dello stesso programma 
posizione precedente. 

Ad esempio: 


definita 
in una 


10 DEF FN1(X)=(S1N(X/5)*3.1)/180 
20 DEF FN2(X)=(FN1(X)+S1N(X))*.5 


un programma con¬ 
catena un altro con 
l'opzione MERGE 


le definizioni di funzione devono essere scritte 
nel programma concatenante prima dell'istruzione 
CHAIN se vengono richiamate dal programma 
concatenato. Altrimenti, quando verrà completata 
l'operazione di MERGE, la funzione definita 
dall'utente risulterà non definita, (per maggio¬ 
ri dettagli vedere il capitolo 11). 


Ad esempio: 

10 DEF FNA(X)=(X+X*(X+1)) 


100 CHAIN MERGE "V1:PR0G1" 


Note 

La sintassi del Richiamo di Funzione è valida sia per le funzioni 
definite dell'utente sia per le funzioni di sistema. 


FUNZIONI NUMERICHE DI SISTEMA 

Il linguaggio BASIC fornisce un numero di routine pre-memorizzate che 
consentono di risparmiare lo sforzo di scrivere gruppi di istruzioni per 
calcolare funzioni matematiche quali la radice quadrata, il seno ed i 
logaritmi naturali. I risultati delle funzioni numeriche di sistema sono 
solo interi o in singola precisione. 

Tutte le funzioni numeriche built-in (di sistema) sono elencate qui di 
seguito in ordine alfabetico. 
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3 


L'utente deve ripetere il 
passo 2 per ogni opera- 
■ zione di Output 


150 WRITE #1 , Al ,B1 , CI $ 





180 WRITE #1,A2,B2$,C2, 
02 

4 


Quando non ci sono più dati da 
registrare, l'utente deve chiudere 
il file (a meno che non debba 
essere riutilizzato con lo 
stesso metodo d'accesso da un 
altro programma concatenato 
al precedente 


300 CLOSE #1 


PR1NT# (PROGRAMMA/IMMEDIATO) 

Registra dati su un file sequenziale, usando lo stesso formato standard 
utilizzato da un'istruzione PR1NT. 


PRINT tt >71 


file 


number 

'V 


<S> 


<*>-> 


expresston 


O 


A 


<D- 


Sintassi 12-6 Istruzione PRINT# 
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FUNZIONI 


Esempio 

PR1NT ATM(3) 
1.24905 
Ok 

LIST 

10 INPUT X 

20 PRINT ATN(X) 

Ok 

RUN 

? 3 

1 .24905 
Ok 


Note 

11 calcolo di ATN viene eseguito in semplice precisione. 


CDBL 


La funzione CDBL converte qualsiasi formato numerico in un argomento in 
doppia precisione (8 byte). 



Sintassi 9-5 Funzione CDBL 


Esempio 


10 A = 454.67 
20 PRINT A ;CDBL(A) 

RUN 

454.67 454.670013427734 

Ok 
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l'utente vuole stabilire 
correttamente la lista 
PR1NT # per leggere poi 
i dati registrati tramite 
una o più istruzioni 
INPUT # 


deve tener presente che un'istruzione 
PR1NT # crea una stringa su disco simile a 
quella che crea una PR1NT sul disco 

PR1NT # registra una stringa di dati codifi¬ 
cata ASCII. La punteggiatura nella lista 
PR1NT # è molto importante 

La virgola e il punto e virgola non racchiusi 
tra virgolette hanno lo stesso effetto di 
quando sono presenti nelle istruzioni PR1NT 


l'utente vuole registra¬ 
re dei valori numerici 
(che possono essere cioè 
il risultato di una 
espressione numerica o 
di relazione o logica) 


deve separare le espressioni con una virgola 
o un punto e virgola 

Se non vuole perdere spazio su disco deve 
usare il punto e virgola anziché la virgola 

Per esempio: 


LIST 

10 OPEN "0”, #1 ."DATAI" 
20 A=1:B=2:C=3 
30 PRINT #1,A ;B;C 
40 CLOSE #1 

50 OPEN "1", #1."DATAI" 

60 INPUT #1,Al,B1,C1 

70 PRINT Al;B1; CI 

80 CLOSE #1 

90 END 

0K 

RUN 

1 2 3 

0K 

30 PRINT#1,A,B,C 
RUN 

1 2 3 

0K 


Se l'utente separa le variabili numeriche A,B 
e C nell'istruzione 30 con virgole anziché 
punti e virgola, il risultato è esattamente 
lo stesso, ma spreca spazio su disco dato che 
vengono inseriti spazi addizionali tra le 
variabi1i 

Con il punto e virgola, la stringa su disco 
sarà : 
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FUNZIONI 


Esempio 

10 X = 2*C0S(.4) 
20 PRINT X 
RUN 

1 .84212 
Ok 


Note 

L'argomento fornito alla funzione viene assunto come la 
angolo espressa in radiante. 

La valutazione di COS è effettuata in singola precisione. 


CSNG 

Converte un argomento di tipo numerico in un numero in 
cisione (4 byte). 


■o 



numeric 


) * 

expression 

*v 


<>> 


Sintassi 9-8 Funzione CSNG 


Esempio 


10 A^= 975.3421 ^ 

20 PRINT A*s; CSNG(A =*) 
RUN 

975.3421 975.342 

Ok 


Note 

Si vedano anche le funzioni CINT e CDBL per la conversione 
formati interi ed a doppia precisione. 


misura di un 


singola pre¬ 


di numeri nei 


9-9 



l'utente vuole regi¬ 
strare dei valori 
stringa che conten¬ 
gono virgole , punti 
e virgola, spazi ini¬ 
ziali o finali si¬ 
gnificativi, ritorni a 
capo o interlinee 


Poiché non ci sono dei delimitatori, questa 
stringa non può essere riletta come due stringhe 
distinte. Per poter fare ciò, bisogna inserire, 
in modo esplicito, un delimitatore (",") nell'i¬ 
struzione 40 e correggere in conseguenza anche 
le istruzioni 70 e 80. 

La stringa registrata su disco sarà allora: 
CAMERA,93605-2 

Questa stringa verrà letta come due stringhe 
separate (vedi la seconda esecuzione del pro¬ 
gramma) 

deve separare le espressioni stringa con un 
carattere virgolette ("), espresso sotto forma 
della funzione CHR$(34) 

Per esempio 

LIST 

10 OPEN "0",#1."DATAI" 

20 A$="CAM£RA, AUTOMATIC" 

30 B$=" 93605-2" 

40 PRINT #1,A$;B$ 

50 CLOSE #1 

60 OPEN "1",# 1."DATAI" 

70 INPUT#1,A$,B$ 

80 PRINT A$;B$ 

90 CLOSE #1 
100 END 
OK 
RUN 

CAMERAAUT0MAT1C 93605-2 
OK 

40 PRINT #1,CHR$(34);A$;CHR$(34); 

B$;CHR$(34) 

RUN 

CAMERA, AUTOMATIC 93605-2 
OK 


L'istruzione 40 registra su disco la seguente 
stringa : 

CAMERA, AUTOMATIC 93605-2 
e l'istruzione 70 assegna la stringa 
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FUNZIONI 


Esempi 

PR1NT FIX(58.75 ) 
58 
Ok 

PRINT FIX(-58.75 ) 

-58 

Ok 


Note 

FIX(X) è equivalente a SGN(X)*1NT(ABS(X)). 

A differenza di INT, FIX nel caso di argomenti negativi non dà il valore 
immediatamente inferiore (vedere il secondo esempio). 


FRE 


Calcola lo spazio di memoria non utilizzato dal programma BASIC. 



<I> 


\ , 

dummy 

r / 

ì * 

argument 



•o 


♦ 


Sintassi 9-11 Funzione FRE 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

dummy argument 

è una espressione numerica o stringa. Il valore 
che la funzione calcola è lo stesso qualunque 
sia l'argomento dato. 


Esempi 


PRINT FRE(0 ) 
14542 
Ok 


9-11 









Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 

string expression 

è la formattazione dei caratteri descritta 
dettagliatamente nel capitolo 7 

expression 

può essere un'espressione numerica, di relazio¬ 
ne, logica o stringa, il cui valore viene 
registrato sul file 


Note 

L'utente deve aver cura di registrare i dati con gli opportuni delimita¬ 
tori in modo da poterli poi rileggere in modo corretto con un'istruzione 
INPUT# 

Per esempio, l'istruzione: 

PR1NT 1 ,USING"####.#^";A,B,C,D 

può essere usata per registrare dati numerici senza delimitatori 
espliciti. La virgola al tarmine della stringa di formato serve a 
separare i dati sul file. 

Si veda il capitolo 7 per maggiori dettagli sulle prestazioni offerte 
dall'istruzione PR1NT US1NG 


URITE # (PROGRAMMA/IMMEDIATO) 

Registra dati su un file sequenziale, usando lo stesso formato utilizzato 
dall'istruzione WRITE sul video. Ogni dato viene separato del precedente 
tramite una virgola. Le stringhe vengono delimitate dal carattere 
virgolette ("). Dopo la registrazione dell'ultimo dato della lista, il 
BASIC introduce un ritorno a capo/interlinea. 
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FUNZIONI 


LOG 


Calcola il logaritmo naturale di un argomento positivo. 



<I> 


s , 

numeric 

,/ 

) ’ 

expression 

*\ 


<ì> 


Sintassi 9-13 Funzione LOG 


Dove: 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

deve essere positiva. Altrimenti si verifica il 
messaggio di errore "lllegal functicn cali" 


Esempio 

PR1NT L0G(45/7) 
1.86075 
Ok 


Note 


Poiché log x = 
a 

può facilmente 


log x 
0 

- -il logaritmo 

log a 
e 

essere convertito. 


in base 10 


(o qualsiasi altra base) 


Esempio 

Log--(X) sarebbe LOG(X)/LOG(10) 

10 

Se questa funzione ricorre più volte nell'ambito di un programma, è 
opportuno che sia definita come funzione utente. 
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substring è una stringa nulla 
e la start position non è speci¬ 
ficata 


il valore della funzione è 1 


LEFT$ 


Fornisce una sottostringa estraendo i caratteri più a sinistra di una 
stringa data per una lunghezza pari a quella assegnata. 



0 - *(& 


string 


>0—i 


length 


•G> 


Sintassi 9-26 Funzione LEFT$ 


Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

string 

è una espressione stringa il cui valore corri¬ 
sponde alla stringa dalla quale la sottostringa 
deve essere estratta 

iength 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo il cui valore (da 0 a 255) 
rappresenta la lunghezza della stringa ritornata 


Esempio 

10 A$ = "BASIC LANGUAGE" 
20 B$ = LEFT$(A$,5) 

30 PRINT B$ 

RUN 

BASIC 

Ok 
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FUNZIONI 


Dal momento che il ciclo inizia per ogni esecuzione, lo stesso programma 
fornisce lo stesso risultato ogni volta che viene eseguito. 

Quando tutti i numeri sono stati utilizzati, il ciclo inizia nuovamente. 

Per modificare la sequenza dei numeri casuali ogni volta che il 
programma viene eseguito, si ponga un'istruzione RANDOMIZE all inizio 
del programma e si modifichi l'argomento ad ogni esecuzione (vedere 
RAND0M1ZE). 


RANDOMIZE (PROGRAMMA/IftflEDlATO) 


Modifica il generatore di numeri casuali. 


< 


RANDOMIZE 


J, 

numeric 

U 



expression 



Sintassi 9-15 Istruzione RANDOMIZE 


Dove 


ELEMENTO DI SINTASSI 


numeric expression 


il suo valore 
32767. Se il 
arrotondato a 
numero viene 
iniziale di 
casuali. 


SIGNIFICATO 


deve essere compreso tra -32768 e 
valore non è un intero, viene 
ll'intero più prossimo. Questo 
utilizzato per definire il punto 
una nuova sequenza di numeri 


Se invece viene omesso, l'esecuzione del pro¬ 
gramma viene sospesa ed il BASIC richiede un 
valore visualizzando: 

Random Number Seed (-32768 to 3z767)? 

prima'di eseguire l'istruzione RANDOMIZt 
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M1D$ 


Estrae una sottostringa da una stringa, iniziando da una data posizione 
di carattere. Si può specificare la lunghezza della sottostringa 
richiesta. In caso contrario verranno ritornati tutti i caratteri della 
stringa da quella posizione alla fine. 


-► (mips') -^-- «ring - 


\_. 

start 

U 


) * 

position 



•GH 


length 



Sintassi 9-28 Funzione M1D$ 


Dove 

ELEMENTO DI SINTASSI 

COMMENTI 

string 

è una espressione stringa il cui valore corri¬ 
sponde alla stringa dalla quale la sottostringa 
deve essere estratta 

start position 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo il cui valore ( >=1 e < = 
della lunghezza della stringa) specifica la 
posizione del carattere d'inizio della sotto¬ 
stringa estratta 

length 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo il cui valore (da 1 a 255) 
rappresenta la lunghezza della sottostringa 
estratta. Se essa viene omessa, vengono estratti 
tutti i caratteri dall'inizio alla fine della 
stringa 


Esempio 

LIST 

10 A$=”G0GD" 
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FUNZIONI 



numerìc 

expression 



Sintassi 9-16 Funzione SGN 


Esempio 

ON SGN(X)+2 GOTO 100,200,300 
salta a: 

- 100 se X < 0 

- 200 se X = 0 

- 300 se X > 0 

SIN 

Calcola il seno dell'argomento 




numeric 

expression 



Sintassi 9-17 Funzione SIN 


Esempio 

PR1NT SINO .5) 
.997495 
Ok 




Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

numeric expression 


l'espressione numerica è arrotondata all'intero 
più prossimo prima che la funzione 0CT$ venga 
valutata 


Esempio 

PR1NT 0CT$(24) 
30 
Ok 


Note 

Vedere la funzione HEX$ per le conversioni esadecimali 


RIGHT$ 


Fornisce una sottostringa estraendo i caratteri più a destra per una 
lunghezza pari a quella assegnata. 




Sintassi 9-30 Funzione RIGHT$ 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

string 


è un'espressione stringa il cui valore corri¬ 
sponde alla stringa originale dalla quale la 
sottostringa deve essere estratta 
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FUNZIONI 



Sintassi 9-19 Funzione TAN 


Esempio 

10 Y = Q*TAN(X)/2 


Note 

Si assume che il valore dell'argomento sia quello di un angolo misurato 
in radianti. 

Se nell'esecuzione di TAN si 
il messaggio di "Overflow", 
massimo che la macchina può 
l'esecuzione continua. 

TAN viene valutata in singola precisione. 


verifica un "overflow", viene visualizzato 
viene fornito come risultato il numero 
rappresentare con il segno appropriato e 


FUNZIONI STRINGA DI SISTEMA 

Sono funzioni intrinseche che calcolano un valore stringa o un valore 
numerico e consentono l'utilizzazione di uno o più argomenti numerici 
e/o stringa. 

Semplificano operazioni stringa quali l'estrazione di una sottostringa 
da una stringa. 

Tutte le funzioni stringa di sistema sono elencate qui di seguito in 
ordine alfabetico. 
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Dove 



Esempio 

10 FOR 1=1 TO 5 
20 X$=SPACES(1) 
30 PR1NT X$ ; 1 
40 NEXT I 
RUN 
1 

2 

3 

4 

5 

Ok 


Note 

Vedasi anche la funzione 5PC nel prossimo paragrafo. 


STR$ 


Converte un'espressione numerica in una stringa. 



Sintassi 9-32 Funzione STR$ 
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FUNZIONI 


Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

l'espressione numerica viene valutata ed arro¬ 
tondata all’intero più prossimo. Deve collocarsi 
nell'ambito di 0 e 255 e viene interpretata come 
un codice decimale ASCII. Se non cade in questo 
intervallo si ha il messaggio "lllegal function 
cali" 


Esempio 

PRINT CHR$(66 ) 
B 

Ok 


Note 

La funzione CHR$ viene spesso usata per inviare un carattere speciale al 
terminale. Ad esempio, può essere lanciato il carattere BEL (CHR$ (7)) 
quale prefazione ad un messaggio di errore o la tabulazione di pagina 
(CHR$(12)) per cancellare il video e riportare il cursore alla posizione 
iniziale. 

Si veda la funzione ASC per la conversione da carattere ASCII al 
corrispondente codice decimale. 


HEX$ 

Converte un numero in una stringa esadecimale, in base alla tabella 
ASCII. 


•o- 



numeric 


) ' 

expression 

'* 


KD" 


Sintassi 9-22 Funzione HEX$ 
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numeric expression 

viene arrotondata all'intero più prossimo. 
Specifica il codice decimale ASCII (da 0 a 255) 
il cui carattere corrispondente viene utilizzato 
per formare la stringa richiesta 

string expression 

viene valutata. 11 suo primo carattere viene 
utilizzato per formare la stringa richiesta 


Esempio 

10 X$=STRING$(10,45) 

20 PRINT X$"M0NTHLY REP0RT"X$ 
RUN 

-MONTHLY REPORT- 

Ok 


VAL 


Converte la rappresentazione stringa di un numero nel suo valore 
numerico. 



Sintassi 9-34 Funzione VAL 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

string expression 


viene valutata. Quando vi sono spazi iniziali o 
finali, caratteri di tabulazione o di interlinea 
questi vengono eliminati. La stringa risultante, 
se è una rappresentazione numerica valida, viene 
convertita in un numero. Altrimenti si ha un 
messaggio di errore. Ad esempio: 
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FUNZIONI 


Esempio 


VIDEO 


COMMENTI 


1000 'Timed Input Subroutine 
1010 RESP0NSE$="" 

1020 POR I%=1 TO TIMEL1MIT% 

1030 A$=INKEYS:IF LEN(A$)=0 THEN 1060 
1040 1F ASC(A$)=13 THEN TIMEOUT%=0:RETURN 
1050 RESP0NSE$=RESP0N5E$+A$ 

1060 NEXT 1% 

1070 TIME0UT%=1: RETURN 


Questa routine ritorna 
due valori: 

- RESP0NSE$ che con¬ 
tiene la stringa 
impostata 

- T1ME0UT% che equi¬ 
vale a 0 se 1 1 utente 
imposta una stringa 
di caratteri prima 
di completare un 
dato numero di cicli 


FOR/NEXT (numero pa¬ 
ri a TlMELlMin), 
altrimenti equivale 
a 1 


1NPUT$ 


Calcola una stringa di una lunghezza specificata, impostata da tastiera 
o letta da un file su disco. 1 caratteri non sono visualizzati e sono 
inoltrati al programma eccetto per che interrompe l'esecuzio¬ 
ne del programma. 




( ) 


X 

-►(iNPUTs)-►(?)-*| 

length j- 

-Lq-Ì-OÌ- 

» ^ììe _ 

number 

-KD— 


Sintassi 9-24 Funzione 1NPUT$ 


9-23 






Sintassi 9-35 


DATE$ e TIMES 


Note 

La data e l'ora possono essere impostate sia in PCOS per mezzo del 
comando ssys o in BASIC per mezzo di una istruzione di assegnazione. La 
data può essere impostata sia come mm:dd:yy, o come mm:dd:yyyy. L'ora 
viene impostata come hh:mm:ss. L'utente può usare propri delimitatori. 
(Qualsiasi carattere ASCII tranne le cifre). Per più dettagliate 
informazioni vedere "Professional Computer Operating System (PCOS) - 
Guida Utente". 


Esempio 


VIDEO 

COMMENTI 

100 IF DATE$="04: 30: 82" ' 

l'istruzione 100 controlla che la 

THEN 3000 

data sia quella desiderata 

• 

l’istruzione 500 imposta la data 

500 DATE$="05/06/1981 " 

l'istruzione 600 visualizza l'ora 

■ 

l’istruzione 700 imposta l'ora 

600 PR1NT TIMES 


700 TIME$="07:40 :15" 
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FUNZIONI 


Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

start position 

è una espressione numerica arrotondata all in¬ 
tero più prossimo che specifica dove la ricerca 
deve iniziare. 11 suo valore deve essere 
compreso tra 1 e 255. Qualora venga omesso si 
assume il valore 1 

string 

è una espressione stringa il cui valore è alla 
stringa da scandire 

substring 

è una costante o una variabile stringa di cui si 
deve cercare la prima occorrenza 


Esempio 

10 X$ = "ABCDEB" 

20 Y$ = "B" 

30 PR1NT INSTR(X$,Y$);1NSTR(4,X$,Y$) 
RUN 
2 6 
Ok 


Valori Speciali 


SE... 

ALLORA... 

start position >LEN (string) 

il valore della funzione è 0 

start position non è compreso 
tra i valori 1 e 255 

si ha il messaggio di errore: 
lllegal argument in line number 
(Argomento non valido nel numero 
di linea) 

string è una stringa nulla ("") 

il valore della funzione è 0 

substring non è individuata 

il valore della funzione è 0 

substring è una stringa nulla 
e start position è specificata 

il valore della funzione è uguale 
a quello di start position ^ 
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o il numero di settori letti o scritti da quando il file è stato aperto 
(file sequenziali). 

Vedere Capitolo 12. 


LPOS 


Ritorna la posizione attuale della testina della stampante (nell'ambito 
del buffer di linea della stampante). 




Sintassi 9-36 Funzione LPOS 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

dummy argument 

è una qualsiasi espressione numerica o stringa. 
11 risultato non dipende dall'argomento dato 


Esempio 

100 1F LPOS(X)>60 THEN LPR1NT CHRS(13) 


Note 

La posizione fornita dalla funzione LPOS non corrisponde necessariamente 
alla posizione fisica della testina. 
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FUNZIONI 


Note 

SE. .. 

ALLORA... 

length=0 

il valore della funzione è una stringa nulla 

length non è compreso 
tra 1 e 255 

si ha il messaggio di errore "lllegal function 
cali" 

(Richiamo di funzione illegale) 

length >LEN(string) 

il valore della funzione è l'intera stringa 


LEN 

Calcola la lunghezza di una stringa specificata. 



<!> 



string 

ì * 

sxpression 



Sintassi 9-27 Funzione LEN 


Esempio 

10 X$ ="P0RTLAND, OREGON" 
20 PR1NT LEN(X$) 

RUN 

16 

OK 


Note 

La funzione LEN conta tutti i caratteri (stampabili o meno) e anche gli 
spazi. 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

numeric expression 


viene arrotondata all'intero più vicino. Indica 
il numero di spazi da inserire nell'immagine 
visualizzata sia tra due dati sia all'inizio o 
alla fine dell'immagine. 



Il numero degli spazi deve essere compreso tra i 
valori 0 e 255 (onde evitare l'errore "lllegal 
function cali") 


Esempio 

PR1NT "OVER" SPC(15) "THERE" 
OVER THERE 

Ok 


Note 

In una istruzione PR1NT o LPRINT la funzione SPC deve essere seguita o 
da un punto e virgola o da uno spazio. 

Vedere anche la funzione SPACE$. 


TAB 

In una istruzione di PR1NT o di LPRINT, la funzione TAB posiziona il 
cursore o testina della stampante alla posizione specificata. 



numeric 


expression 




Sintassi 9-38 Funzione TAB 
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FUNZIONI 


20 B$="M0RN1NG EVEN1NG AFTERNOON" 
30 PR1NT A$;MID$(B$,9,7) 

Ok 

RUN 

GOOD EVENING 
OK 


Note 


SE. .. 

ALLORA... 

start position > LEN(string) 

il valore della funzione è una 
stringa nulla 

start position=0 

si ha il messaggio di errore 
'Illegal Argument in line number" 
(Argomento illegale nel numero di 
linea) 

length è omessa 

OPPURE 

il numero dei caratteri è in¬ 
feriore a quello specificato 
da length 

il valore della funzione corri¬ 
sponde alla stringa data 


OCT$ 


Calcola una stringa che rappresenta il valore ottale di un argomento 
decimale. 



Sintassi 9-29 Funzione 0CT$ 
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Sintassi 9-39 Funzione USR 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

digit 

è un valore compreso tra 0 e 9 e corrisponde 
alla cifra impostata per mezzo della istruzione 
associata DEF USR (vedere sotto). NON VA 
INSERITO NESSUNO SPAZIO TRA LA FUNZIONE E LA 

CIFRA. 

numeric expression 

è l'argomento trasferito al sottoprogramma 


Esempio 

40 B = T*S1N(Y) 
50 C = USR (B/2) 
60 D = USR (B/3) 


DEF USR (PROGRAfttlA/lfWEDIATO) 


Specifica l'indirizzo di inizio di un sottoprogramma in linguaggio 
Assembler. 

Prima di richiamare un sottoprogramma in linguaggio Assembler deve 
essere eseguita l'istruzione DEF USR. 
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FUNZIONI 


length 


è una espressione numerica arrotondata all'in¬ 
tero più vicino, il cui valore compreso tra 0 e 
255 rappresenta la lunghezza della “stringa 
richiesta 


Esempio 

10 A$="D1SK BASIC" 

20 PR1NT R1GHT$(A$,5) 

RUN 

BASIC 

Ok 


Note 


SE. .. 


ALLORA... 

1ength=0 


il valore della funzione è la stringa nulla 

length> =LEN(string) 


il valore della funzione è la stringa data 


SPACE$ 


Fornisce una stringa di spazi della lunghezza richiesta. 


► (SPACES^ > (7)- 


\ , 

numeric 

,/ 

) * 

expression 

'V 


<•> 


Sintassi 9-31 Funzione SPACE$ 
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VARPTR 


Formato 1. Fornisce l'indirizzo di memoria del primo byte del dato 
associato alla variabile specificata. 

Formato 2. Nel caso di file sequenziali fornisce l'indirizzo iniziale 
del buffer di 1/0 associato al file. Nel caso di file random fornisce 
l'indirizzo iniziale del buffer di 1/0 associato al file, definito 
tramite l'istruzione F1ELD. 



VARPTR 


> 



variabie 

name 



♦ 



VARPTR^ 



file 

number 



Sintassi 9-41 Funzione VARPTR 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

variabie name 

qualsiasi tipo di variabile (numerica, stringa o 
matrice). L'indirizzo ritornato sarà un'intero 
compreso tra -32768 e 32767. 

Nota: Se l’indirizzo ottenuto è negativo, si 
deve aggiungere 65536 per ottenere l'indirizzo 
effettivo 

file number 

per i file sequenziali: buffer di I/O per i file 
casuali: buffer di 1/0 definito tramite l'istru¬ 
zione FIELO 
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FUNZIONI 


Esempio 

5 REM AR1THMET1C POR KIDS 
10 INPUT "TYPE A NUMBER" ;N 

20 ON LEN (STR$(N)) GOSUB 30,100,200,300,400,500 


Note 

VAL esegue la funzione inversa (vedere VAL) 


STR1NG$ 


Crea una stringa di una lunghezza specificata, i cui caratteri sono 
tutti uguali o al carattere il cui codice ASCII è specificato, o al 
primo carattere di una stringa specificata. 



Sintassi 9-33 Funzione STR1NG$ 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

length 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo. Specifica la lunghezza (da 0 
a 255) della stringa risultante 
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FUNZIONI 


VAL (" -3") 
dà -3 


Esempio 

10 READ NAME$,C1TY$,STATE $,Z1PS 
20 IF VAL(21P$)< 90000 OR VAL(ZIP$)> 96699 THEN 
PRINT NAME$ TAB(25) "OUT OF STATE" 

30 1F VAL (Z1P$) >=90801 AND VAL (Z1P$ ) < =90815 THEN 
PRINT NAME$ TAB(25) "LONG BEACH" 


Note 

STR$ esegue la funzione inversa (vedere STR$). 


FUNZIONI DI INPUT/OUTPUT E FUNZIONI SPECIALI DI SISTEMA 


Queste funzioni facilitano l'esecuzione di operazioni di input/output, 
le conversioni di valori, la gestione degli errori, il posizionamento 
del cursore, le allocazioni delle aree di memoria, ecc. Tali funzioni 
sono elencate qui di seguito. 


Note 

In questo paragrafo includiamo anche l'istruzione DEF USR (poiché è 
strettamente legata alla funzione USR) e le parole stringa riservata 
DATES e TIMES (che possono essere usate o come funzioni se appaiono in 
una espressione o come variabili se scritte alla sinistra del segno di 
uguale in una istruzione di assegnazione). 


DATES/TIMES 

Sono elementi del PCOS che da BASIC possono essere lette o sostituite 
per mezzo di queste stringhe riservate. 
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Spesso, una stessa sequenza di istruzioni deve essere eseguita più di 
una volta nell'ambito di uno stesso programma. 

In questo caso l'utente non deve riscrivere questa sequenza più volte, 
ma può scrivere un sottoprogramma che può essere richiamato in qualsiasi 
punto del programma. 

Alla fine dell'esecuzione del sottoprogramma, il controllo ritorna 
all'istruzione successiva a quella del richiamo. 

L'M20 consente di utilizzare due tipi diversi di sottoprogrammi richia¬ 
mabili da un programma BASIC: 

- sottoprogrammi scritti in BASIC ("BASIC Subroutines") 

- sottoprogrammi scritti in linguaggio ASSEMBLER M20 cioè comandi PCOS o 
sottoprogrammi forniti dall'01ivetti. 

11 seguente capitolo illustra questi due tipi di sottoprogrammi e i 
meccanismi di richiamo. 


INDICE 

BASIC SUBROUTINES 10-1 

GOSUB/RETURN (PROGRAMMA) 10-3 

0N...GOSUB/RETURN (PROGRAMMA) 10-7 

COMANDI PCOS RICHIAMABILI 10-9 
DA BASIC E SOTTOPROGRAMMI 
ASSEMBLER 

CALL (PROGRAMMA/IMMEDIATO) 10-10 
EXEC (PROGRAMMA/IMMEDIATO) 10-12 
SYSTEM (PROGRAMMA/IMMED IATO) 10-14 
TASTI PROGRAMMABILI 10-14 




FUNZIONI 


evo 

Converte una stringa di 8 caratteri in un numero in doppia precisione. 
Vedere Capitolo 12. 

CV1 

Converte una stringa di 2 caratteri in un intero; 

Vedere Capitolo 12. 

CVS 

Converte una stringa di 4 caratteri in un numero in singola precisione. 
Vedere Capitolo 12. 

EOF 

Dà -1 se viene raggiunta la fine del file. 

Vedere Capitolo 12. 

ERL 

Dà il numero di linea della linea in cui è stato trovato l'errore. 

Vedere Capitolo 13. 

ERR 

Dà il numero del codice di errore. 

Vedere Capitolo 13. 

LOC 

Dà il numero del successivo record da leggere o scrivere (file random), 
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Se un programma richiama una stessa subroutine .più di una volta, alla 
fine dell'esecuzione della subroutine il controllo viene sempre trasferi¬ 
to alla istruzione successiva all'ultima GOSUB (o QN...G0SUB) che è stata 
eseguita. 

Per esempio, consideriamo un programma che contenga le seguenti istruzio- 
n i : 


PROGRAMMA 


10 REM Programma 
Principale 


Quando la 
1'istruzione 
trasferito, 
subroutine, 


COMMENTI 


subroutine viene attivata 
50 (GOSUB), il controllo 
alla fine dell'esecuzione 
all'istruzione 60. 


tramite 

viene 

della 


r~50 GOSUB 250 
60 PR1NT X 


—140 GOSUB 250 
150 IF X > 32 THEN30* 


j 240 GOTO 500 
U>250 REM Subì 
260 Z=SQR(T) 


290 RETURN 


Quando la subroutine viene di nuovo attivata 
tramite l'istruzione 140 (GOSUB), il controllo 
viene trasferito, alla fine dell'esecuzione 
della subroutine, all'istruzione 150 


500 END 


Una subroutine può essere anche richiamata da un'altra subroutine. In 
questo caso, diremo che la subroutine richiamata è "nested" (annidata) 
nella subroutine che la ha attivata. 

Questo meccanismo può essere ripetuto più volte: il numero di subroutine 
"nested" contemporaneamente attive, (cioè con istruzione RETURN non 
ancora eseguita), è limitato solo dalla memoria disponibile. 
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FUNZIONI 


MKD$ 

Converte un numero in doppia precisione in una stringa di 8 caratteri. 
Vedere Capitolo 12. 

MK1$ 

Converte un numero in singola precisione in una stringa di 4 caratteri. 
Vedere Capitolo 12. 

MKS$ 

Converte un numero in singola precisione in una stringa di 4 caratteri. 
Vedere Capitolo 12. 

POS 

Posiziona il cursore di testo per la finestra attuale. 

Vedere Capitolo 14. 

SPC 

Inserisce gli spazi nelle istruzioni PR1NT o LPR1NT. 


^ spc )— 


\ , 

numeric 


ì ’ 

expression 



<>> 


Sintassi 9-37 Funzione SPC 
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RETURN trasferisce il controllo alla prima istruzione successiva all'ul¬ 
tima GOSUB (oppure 0N...G0SUB) eseguita. 



Sintassi 10-1 Istruzione GOSUB 




ELEMENTO DI SINTASSI 


SIGNIFICATO 


line number 


è il primo numero di linea di una subroutine 



UNA SUBR0UT1NE PUÒ'... COMMENTI 

iniziare con qualsiasi istruzio- per esempio una subroutine può 

ne (ad esclusione di NEXT) iniziare con REM, LtT, F0R,...ecc.. 

E' buona norma di programmazione 
iniziare sempre una subroutine con 
REM ( o con un’istruzione che 
termina con un campo commento) 
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FUNZIONI 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


numeric expression 


viene arrotondata all'intero più vicino. 11 
valore dell'espressione deve essere compreso tra 
1 e 255 (onde evitare l'errore "lllegal function 
cali"). 


11 valore minimo è 1, l'ampiezza della linea -1 
è il limite destro. 


Questo valore specifica la posizione del cursore 
(o della testina della stampante) in una linea. 


Esempio 

10 PRINT "NAME" TAB(25) "AMOUNT":PR1NT 
20 READ A$,B$ 

30 PRINT A$ TAB(25) B$ 

40 DATA "G.T.JONES","$25.00" 

RUN 

NAME AMOUNT 

G.T.JONES $25.00 

Ok 


Note 

Se la posizione del cursore o della testina scrivente della stampante è 
oltre la posizione indicata dal valore dell'argomento, TAB fa si che il 
cursore o la testina si posizionino nella giusta posizione sulla linea 
successiva. 


USR 


Richiama un sottoprogramma in linguaggio Assembler passando a questo un 
argomento. 
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Eseapi 


VIDEO 


LIST 

10 DEF1NT A-Z 'definisce tutte le 
variabili intere 

20 INPUT "Introduci 3 interi"; A,B,C 

30 LET X=A 

40 LET Y=B 

50 GOSUB 110 

60 LET X=M 

70 LET Y=C 

80 GOSUB 110 

90 PR1NT "MCD di";A;B;C"=";M 
100 GOTO 190 

110 LET Q=1NT(X/Y) 'subroutine per 

trovare l'MCD di 
X e Y 

120 LET R=X-Q*Y 

130 1F R=0 THEN 170 

140 LET X=Y 

150 LET Y=R 

160 GOTO 110 

170 LET M=Y 

180 RETURN 

190 END 

Ok 

RUN 

Introduci 3 interi? 1377,2916,405 
L’MCD di 1377 2916 405 = 81 

OK 
RUN 


COMMENTI 


questo è un programma atto ad 
evidenziare l'uso di una subrou¬ 
tine. 

La subroutine utilizza l'algoritmo 
di Euclide, per trovare il massimo 
comune divisore (MCD) di tre numeri 
interi (A, B e C). Questi vengono 
introdotti da tastiera: i primi due 
A e B vengono assegnati rispettiva¬ 
mente alle variabili X e Y (vedi 
istruzioni 30 e 40) e la subroutine 
determina il loro MCD (vedi istru¬ 
zioni da 110 a 180). 

L'MCD trovato viene assegnato alla 
variabile X nell'istruzione 60 e il 
terzo numero (C) viene assegnato 
alla variabile Y nell'istruzione 
70. 

La subroutine viene richiamata di 
nuovo (vedi istruzione 80) per 
trovare l'MCD di questi due numeri. 

11 risultato è l'MCD dei tre nume¬ 
ri. Essi vengono visualizzati in¬ 
sieme con il loro MCD tramite 
l'istruzione 90. 


Introduci 3 interi? 4,3333,67 
L’MCD di 4 3333 67 = 1 

Ok 


LIST 

10 INPUT "Introduci N > 0";N% 
20 1F N%<=0 THEN 10 
30 GOSUB 50 
40 END 

50 REM SUBÌ (Somma di Interi) 
60 S%=((N%+1))/2 


Nota : L'istruzione 10 definisce 
tutte le variabili intere, dato che 
il programma opera solo su numeri 
inte ri 


Questo programma calcola la somma 
dei numeri interi da 1 a N (dove N 
è introdotto da tastiera) e su 
richiesta, la somma dei quadrati di 
questi numeri. 

11 programma ha due subroutine SUBÌ 
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FUNZIONI 



Sintassi 9-40 Istruzione DEF USR 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

digit 

è compreso tra 0 e 9, e corrisponde al numero 
del sottoprogramma USR di cui viene specificato 
l'indirizzo. Se manca la cifra, l'istruzione DEF 
USR assume il valore 0 (cioè come se fosse DEF 
USR0) 

numeric expression 

è arrotondato all’intero più vicino. Rappresenta 
l'indirizzo di partenza del sottoprogramma USR. 


Esempio 


200 OEF USR0=24000 
210 X=USR0(Y A 2/2.89) 


Note 

E' possibile scrivere -più istruzioni DEF USR nello stesso programma per 
definire (o ridefinire) gli indirizzi di partenza dei sottcprogrammi, 
permettendo quindi l'accesso a tutti i sottoprogrammi necessari. 
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Sintassi 10-3 Istruzione ON...GOSUB 



Sintassi 10-4 Istruzione RETURN 


Dove 


ELEMENTO DI SINTASSI 


numeric expression 


SIGNIFICATO 


il suo valore specifica la subroutine da richia¬ 
mare : 

- se il suo valore è 1 , viene richiamata la 
subroutine il cui primo numero di linea è il 
primo della list; 


- se il suo valore è 2, viene richiamata la 
subroutine il cui primo numero di linea è il 
secondo della lista, e così via. 


Se il suo valore non è intero, viene arroton¬ 
dato all'intero più vicino. 

Se il suo valore è uguale a 0, o è maggiore 
del numero di line number della lista (ma 
minore o uguale a 255), viene eseguita l'i¬ 
struzione successiva alla 0N...G0SU6. 
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FUNZIONI 


Esempio 

100 X%=VARPTR(A(0) ) 


200 Y=USR(VARPTR(X) ) 


Note 

Se, prima dell'esecuzione della VARPTR, non è stato assegnato alcun 
valore alla variabile si verificherà l'errore "lllegal funzione cali". 

La VARPTR viene generalemente usata per ottenere l'indirizzo di una 
variabile o di una matrice affinchè possa essere passata ad un 
sottoprogramma in linguaggio Assembler. La funzione viene usata nella 
forma VARPTR (A(0)) per ottenere l'indirizzo del primo elemento della 
matrice. 

Tutte le variabili semplici dovrebbero essere assegnate prima di 
richiamare la VARPTR relativa ad una matrice, poiché l'indirizzo delle 
matrici cambia quando viene assegnata una nuova variabile semplice. 
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Le istruzioni CALL ed EXEC possono essere utilizzate sia in un programma 
BASIC sia in modo immediato ma sono più spesso usate in un programma. 

Alla fine dell'esecuzione di un sottoprogramma Assembler o di un comando 
PCOS, il controllo ritorna all'istruzione seguente a quella del richiamo 
(se CALL o EXEC sono state usate in un programma) oppure ritorna al BASIC 
Stato Comandi (se CALL o EXEC sono state usate in modo immediato). 

Diremo che un sottoprogramma Assembler o un comando PCOS è pendente se 
non è stato completato quando si è verificata un'interruzione. Qualsiasi 
modifica al programma residente in memoria (cancellazione o modifica di 
linee ecc...) impedirà di ridare il controllo al sottoprogramma o al 
comando PCOS. 

L’utilizzo di CALL o EXEC consente di eseguire un programma che interagi¬ 
sce con il PCOS, per esempio per settare i valori delle variabili globali 
di sistema prima di eseguire altri programmi BASIC o comandi PCOS. 

Alla fine dell'esecuzione di questo programma è possibile restare in 
BASIC o passare in PCOS (tramite il comando SYSTEM). 

Normalmente un tale programma di inizializzazione viene denominato 1N1T. 
BAS (in lettere maiuscole). Questo è un nome di file riservato. L'M20 
dopo aver caricato il PCOS e il BASIC ricerca questo file su entrambi i 
drive. Se viene trovato, l'M20 entra in BASIC ed esegue IN1T.BAS. 


Note 

Alla fine dell’esecuzione di una istruzione CALL o EXEC che attiva un 
comando PCOS sbasic, i nuovi valori settati da sbasic verranno presi in 
considerazione solo quando il sistema ritorna in BASIC (altrimenti il 
programma in corso potrebbe essere distrutto). Quindi una istruzione EXEC 
"basic" che fa ritornare in BASIC segue spesso a una EXEC "sbasic". 


CALL (PR0GRAMMA/1MMED1AT0) 


Richiama da BASIC un comando PCOS o un sottoprogramma ASSEMBLER, passando 
al sottoprogramma variabili di programma o costanti. 


10-10 


LINGUAGGIO BASIC - MANUALE GENERALE 



10. SOTTOPROGRAMMI 




do PCOS pkey specificando il tasto 
tramite la costante esadecimale &41 
(cioè A) e la stringa corri¬ 
spondente tramite la variabile C$. 

L'istruzione 150 richiama il sotto- 
programma ASSEMBLER SUB 121 passan¬ 
do due argomenti di input (A e B) e 
uno di output (<3>C) 


Note 

Vi sono due comandi PCOS che di solito vengono richiamati in BASIC tra¬ 
mite l'istruzione CALL. Essi sono: 

- MI (Istruzione Macchina) che permette di eseguire direttamente istru¬ 
zioni del linguaggio macchina della CPU Z8001 

- LTERM (Line Terminator) che ritorna un valore intero (0, 1, 2) corri¬ 
spondente all'ultimo tasto di chiusura impostazione utilizzato ( , 


SI 


Per ulteriori informazioni vedere "Professional Computer Operating 
System (PCOS) - Guida Utente". 

EXEC (PROGRAMMA/IMMEDIATO) 


Richiama da BASIC un comando PCOS o un sottoprogramma ASSEMBLER, passando 
valori costanti al sottoprogramma. 



Sintassi 10-6 Istruzione EXEC 
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SOTTOPROGRAMMI 


BASIC SUBROUT1NES 


Una subroutine BASIC è costituita da un insieme qualsiasi di istruzioni 
BASIC ed è parte integrante del programma. Di norma (ma non necessaria¬ 
mente) inizia con un'istruzione REM e termina con un'istruzione RETURN. 
E' buona norma di programmazione scrivere la subroutine una dopo l'altra 
alla fine del programma e chiudere il programma principale (prima del¬ 
l'inizio della prima subroutine) con un'istruzione END, oppure GOTO, 
oppure STOP. 

Una subroutine può essere richiamata da un'istruzione GOSUB oppure 
0N...G0SUB. Alla fine dell'esecuzione della subroutine, il controllo 
ritorna all'istruzione successiva a quella del richiamo. 

Diremo che una subroutine è "pendente" se il controllo non è stato ancora 
restituito al programma principale quando si è verificata una interru¬ 
zione. Ogni eventuale modifica al programma residente in memoria (can¬ 
cellazione, modifica di linee ecc...) impedirà di ridare il controllo 
alla subroutine. 

La seguente tabella illustra il meccanismo di richiamo di una subroutine 
(istruzioni GOSUB e RETURN) 


PROGRAMMA 


COMMENTO 

10 REM Programma 

Principale 


Quando viene eseguita l'istruzione 50 del pro¬ 
gramma principale (GOSUB) il controllo viene 
trasferito all ' istruzione 250 (che è la prima 
istruzione della subroutine). 

-50 GOSUB 250 

60 PR1NT X «— 

• 



La subroutine viene quindi eseguita e quando si 
incontra l'istruzione 290 (RETURN), il controllo 
viene trasferito all’istruzione 60, cioè alla 
prima istruzione dopo la GOSUB. 

240 GOTO 500 
-►250 REM Subì 
260 Z=SQR(T) 



L'istruzione 240 (GOTO), evita una eventuale 
attivazione non corretta della subroutine 

290 RETURN 




500 END 
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L'istruzione 150 permette di ri¬ 
chiamare da BASIC il comando PCOS 
fpass per assegnare la password 
SECRET al file MY.FILE, residente 
sul disco inserito nella prima 
unità. 

L'istruzione 230 permette di ri¬ 
chiamare il comando PCOS fnew, 
specificando il comando tramite il 
contenuto di una variabile stringa 


SYSTEM (PROGRAMMA/IMMED1AT0) 


Consente di passare da BASIC a PCOS e di chiudere tutti i file dati. 



SYSTEM 


> 


-*• 


Sintassi 10-7 Comando SYSTEM 


Note 

Il comando SYSTEM permette all'utente di ritornare in PCOS. Può essere 
usato sia in modo immediato sia all'interno di un programma BASIC. Viene 
frequentemente usato come ultima istruzione di un programma che utilizza 
istruzioni CALL ed EXEC per eseguire in sequenza una serie di comandi 
PCOS e/o sottoprogrammi ASSEMBLER. 


TASTI PROGRAMMABILI 


Usando i tasti gTOIg e 
non sia un tasto shift), 
lare a ogni tasto. 


GOMMANO 


1'utente 


, assieme a qualsiasi altro tasto (che 
può assegnare un significato partico- 
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SOTTOPROGRAMMI 


Ogni istruzione GOSUB, sia essa nel programma_principale o in una subrou¬ 
tine, viene sempre associata ad una istruzione RETURN. Questa istruzione 
RETURN è quella che trasferisce il controllo all'istruzione successiva 
alla GOSUB. Questo tipo di associazione viene fatto in modo dinamico 
(cioè a run-time): la prima istruzione RETURN eseguita viene associata 
all'ultima GOSUB eseguita, la seconda RETURN alla penultima GOSUB, e così 
via. 


PROGRAMMA 


COMMENTO 


10 REM Programma 
Principale 


-800 GOSUB 1500 
810 «- 


1490 ENO 
►1 500 REM Subì 


-1900 GOSUB 2500 
1910 «- 


2490 RETURN — 
►2500 REM Sub2 


3000 RETURN 


800 GOSUB 1500 trasferisce il controllo alla 
subroutine Subì 

1500 REM Subì individua l'inizio della subrou¬ 
tine Subì 

1900 GOSUB 2500 trasferisce il controllo da 
Subì a Sub2 ("nested" subroutine) 

2500 REM Sub2 individua l'inizio della subrou¬ 
tine Sub2 

3000 RETURN trasferisce il controllo all’i¬ 
struzione successiva all'ultima GOSUB eseguita 
(cioè all'istruzione 1910) 

2490 RETURN trasferisce il controllo alla 
istruzione successiva alla penultima GOSUB 
eseguita (cioè all’istruzione 810) 


GOSUB/RETURN (PROGRAMMA) 

GOSUB richiama una subroutine passando il controllo al suo primo numero 
di linea 
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SOTTOPROGRAMMI 


finire con un'istruzione RETURN 

è buona norma di programmazione 
finire sempre una subroutine con 
un'istruzione RETURN. In ogni caso 
RETURN deve essere l'istruzione 
eseguita per ultima, dato che è 
l'unica istruzione che consente di 
ridare il controllo al programma 
principale. 

Una subroutine può avere anche più 
di una istruzione RETURN (ad esem¬ 
pio quando è strutturata in modo da 
avere più diramazioni ognuna delle 
quali richieda di ridare il con¬ 
trollo al programma principale 

essere richiamata in qualunque 
punto del programma, e un numero 
qualsiasi di volte 

se un programma richiama una stessa 
subroutine più di una volta, il 
controllo viene trasferito dalla 
subroutine all'istruzione che segue 
la GOSUB (oppure la 0N...G0SUB) 
eseguita per ultima 

essere inserita in qualsiasi 
punto del programma 

però è buona norma di programma¬ 
zione scrivere le subroutine una 
dopo l'altra alla fine del program¬ 
ma, e chiudere il programma (prima 
dell'inizio della prima subroutine) 
con un'istruzione END, oppure GOTO, 
oppure STOP 

richiamare un'altra subroutine 

il numero di subroutine "nested" 
contemporaneamente attive, cioè con 
istruzione RETURN non ancora ese¬ 
guita), è limitato solo dalla 
memoria disponibile 

accedere ad ogni variabile di 
programma 

tutte le variabili definite nel 
programma "principale" sono note 
anche alla subroutine. Queste pos¬ 
sono quindi operare su ogni varia¬ 
bile senza restrizioni, (modi¬ 
ficandone anche il valore) 
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SOMMARIO 


In questo capitolo illustreremo la tecnica di segmentazione dei 
programmi e le modalità di passaggio dati da un programma a un altro. 

Esamineremo in particolare l'istruzione CHAIN (con tutte le sue opzioni) 
e l'istruzione COMMON. Inoltre ricorderemo l'uso dei comandi RUN e LOAD 
con l'opzione R. 


INDICE 

QUANDO USARE LA SEGMENTA- 

11-1 

Z10NE DEI PROGRAMMI 


TRASFERIMENTO DATI 

11-2 

CONCATENAMENTO DEI PRO- 

11-3 

GRAMMI 


CHAIN (PROGRAMMA) 

11-3 


COMMON (PROGRAMMA) 
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SOTTOPROGRAMMI } 


70 PR1NT "Somma di Interi da 1 
a " ; N% ;;S% 

80 INPUT "Somma di Quadrati 
(S/N)";X$ 

90 1F X$="S" THEN GOSUB 110 
100 RETURN 

110 REM 5UB2 (Somma di Quadrati) 
120 S2%=(N%*(N%+1)*(2*N%+1))/6 
130 PRINT "Somma di Quadrati da 
1 a ";N%;"=";S2% 

140 RETURN 

Ok 

RUN 

Introduci N>0? 5 

Somma di Interi da 1 a 5= 15 

Somma di Quadrati (S/N)? S 

Somma di Quadrati da 1 a 5= 55 

Ok 


e SUB2 inserite alla fine (istru¬ 
zione da 50 a 100 e da 110 a 140). 

Vengono prima eseguite le istruzio¬ 
ni 10, 20 e 30. L'istruzione 30 

(GOSUB) richiama la subroutine SUBÌ 
e le istruzioni di quest'ultima 
vengono eseguite in sequenza fino 
all'istruzione 90. 

Questa esegue un test: 

- se il valore di X$ (introdotto da 
tastiera) è diverso da "S", il 
controllo passa all'istruzione 
100 (RETURN) e quindi all'i¬ 
struzione 40 (END) 

- se il valore di X$ è uguale a 
"S", viene richiamata la sub¬ 
routine SUB2 (che è quindi 
"nested"). Quando si arriva all 
istruzione 140 (RETURN di SUB2), 
il controllo passa all'istruzione 
100 (RETURN di SUBÌ) e quindi 
alla 40 (END). 


ON_GOSUB/RETURN (PROGRAMMA) 

L'istruzione ON...GOSUB richiama una subroutine scelta tra n subroutine 
specificate. 

L'istruzione RETURN trasferisce il controllo alla prima istruzione 
successiva all'ultima ON...GOSUB (o G05UB) eseguita. 
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-TRASFERIMENTO DATI 


La segmentazione dei programmi comporterà la necessità di trasferire 
dati da un programma al successivo- Ciò può essere fatto in vari modi, 
come indicato dalla seguente tabella. 


SE si utilizza... 


CHAIN insieme a 
una o più istruzio¬ 
ni COMMON 


CHAIN con l'opzio¬ 
ne ALL 


CHAIN e il pro¬ 
gramma attuale accede 
ad uno o più file 
dati 



RUN o LOAD con 
l'opzione R, e il 
programma attualmente 
in memoria accede 
a uno o più file 
dati 



il BASIC crea un'area "common" che non viene 
ricoperta dal programma concatenato (il program¬ 
ma residente in memoria viene invece ricoperto). 

L'area "common" contiene tutte le variabili 
specificate nell'istruzione COMMON; il programma 
concatenato può accedere a queste variabili. 


tutte le variabili definite dal programma resi¬ 
dente in memoria, vengono trasferite al program¬ 
ma concatenato. 


il trasferimento dei dati può avvenire anche 
tramite l'utilizzo di questi file. 

L'istruzione CHAIN non chiude i file dati. 


L'utilizzo dei file dati è compatibile con: 

- le istruzioni CHAIN e COMMON 

- l'istruzione CHAIN con l'opzione ALL 

- l'istruzione CHAIN con l'opzione MERGE (ed 
eventualmente DELETE - vedere la spiegazione 
dell'opzione DELETE più avanti in questo 
capitolo). 


il trasferimento dati avviene tramite l'utilizzo 
di questi file. I commandi RUN o LOAD con 
l'opzione R non chiudono i file dati. 
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SOTTOPROGRAMMI 


Se il suo valore è negativo o maggiore di 255, 
si ha il seguente messaggio d'errore: 


line number 


lllegal funtion cali 


ogni line number specificato deve essere 
primo numero di linea di una subroutine 


il 


Esempio 


VIDEO 


LIST 

10 INPUT "Introduci 1 ,2 o 3";K% 
20 ON K% GOSUB 40,50,60 
30 END 

40 PRINT "SUBÌ":RETURN 
50 PRINT "SUB2": RETURN 
60 PRINT "SUB3":RETURN 
Ok 
RUN 

Introduci 1,2 o 3? 2 

SUB2 

Ok 


COMMENTI 


se l'utente introduce il numero 1, 
il programma visualizza SUBÌ, se 
introduce 2 visualizza SUB2, se 
introduce 3 visualizza SUB3. 

In ognuno di questi casi una istru¬ 
zione RETURN trasferisce il con¬ 
trollo alla END; 

Se l'utente introduce un intero tra 
0 e 255, diverso da 1 , 2 o 3 il 
programma non visualizza nulla 


COMANDI PC05 RICHIAMABILI DA BASIC E SOTTOPROGRAMMI ASSEMBLER 


Le istruzioni CALL ed EXEC consentono di richiamare da BASIC sottopro¬ 
grammi Assembler o comandi PCOS. I sottoprogrammi Assembler sono forniti 
dal 1'Olivetti e sono richiamabili anche tramite le funzioni USR. 


Entrambe queste istruzioni hanno la stessa funzione ma: 

- EXEC viene usata quando gli argomenti da passare ai corrispondenti 
parametri sono valori costanti 


- CALL viene usata quando gli argomenti 
parametri sono o costanti o variabili di 


da passare 
programma. 


ai 


corrispondenti 
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-Dove - 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

MERGE 


viene eseguita un'operazione di MERGE tra il 
programma attualmente in memoria e il programma 
concatenato. Quest'ultimo deve essere stato 
registrato su disco in formato ASCII. 

Se l'opzione MERGE viene omessa, il programma 
attualmente in memoria viene ricoperto dal 
programma concatenato (ad esclusione dell'even¬ 
tuale area "common"). 

MERGE viene spesso usata con l'opzione DELETE e 
line number expression per eseguire una sequenza 
di "overlay" (v. Esempi). 

iNota: l'opzione MERGE non modifica i tipi delle 
variabili e le funzioni definite dall'utente, in 
modo che possano essere usate dal programma 
concatenato. 

Se si usa l'opzione MERGE, le funzioni utente 
devono essere inserite nel programma prima 
dell'istruzione CHAIN MERGE, altrimenti queste 
funzioni resteranno indefinite. 

file identifier 


è un'espressione stringa che specifica il 
programma da concatenare 

line number expres¬ 
si on 


può essere un numero di linea o una espressione 
il cui valore rappresenta un numero di linea del 
programma concatenato. 

Questo parametro individua la linea del program¬ 
ma concatenato che viene eseguita per prima. 
Questo parametro viene spesso usato insieme con 
MERGE e DELETE per eseguire una sequenza di 
overlay. 5e questo parametro è omesso, il 
programma concatenato viene eseguito a partire 
dall'inizio. 

Nota: Il comando RENUM non modifica il valore di 
questo parametro 

L ---—-- - _ ■—1 
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SOTTOPROGRAMMI 



Sintassi 10-5 Istruzione CALL 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

subprogram name 


può essere o il nome di un comando PCOS o il 
nome di un sottoprogramma ASSEMBLER. Può essere 
una costante o una variabile stringa 

argument 


può essere una costante o una variabile semplice 
o una espressione il cui valore viene trasferito 
al parametro corrispondente (il meccanismo di 
passaggio argomenti/parametri è del tutto ana¬ 
logo a quello visto per le funzioni - vedi 
Capitolo 9). 



Se "argument" è un argomento di output (cioè se 
il sottoprogramma ritorna un valore al BASIC), 
il nome dell'argomento deve essere preceduto dal 
simbolo 


Ese«pi 


VIDEO 


30 FILE$="VOL1:FILE001" 

40 S1ZE%=10 

50 CALL "fn"(F!LE$,SIZE%) 


COMMENTI 


l'istruzione 50 richiama il comando 
PCOS fnew, passando l'identifi¬ 
catore di file tramite la variabile 
stringa FILE $ e la dimensione del 
file tramite la variabile numerica 
SIZE%. 


L'istruzione 100 richiama 


il coman- 

► 
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il programma PR0G2 concatena PR0G3 
e trasferisce i valori di A2,B2 e 
C2$ (tramite l'uso di un'area 
"common"). 

11 programma PR0G3 viene eseguito 
a partire dalla linea 200. 

PR0G3 risiede sul disco inserito 
sull'ultima unità selezionata o 
sull'unità 0 se nessuna unità era 
stata selezionata in precedenza 


il programma PROG10 concatena 
PR0G11 e trasferisce a questo 
tutte le sue variabili. 

PR0G11 viene eseguito a partire 
dalla linea 100. 

PR0G11 risiede sul disco inserito 
nell'unità 1. 


il programma ROOT concatena con 
l'opzione MERGE il programma 
0VERLAY1 (registrato in formato 
ASCII sul disco VI). 

Questo viene eseguito a partire 
dalla linea 1000 


il programma 0VERLAY1 concatena 
con l'opzione MERGE il programma 
0VERLAY2 (registrato in formato 
ASCII sul disco VI). 

Questo viene eseguito a partire 
dalla linea 1000. Prima del suo 
caricamento però la memoria dalla 
linea 1000 alla 1510 viene cancel¬ 
lata 
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SOTTOPROGRAMMI 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string expression 

il suo valore viene interpretato come il nome di 
un sottoprogramma seguito da una lista di 
argomenti costanti 


Note 

Se EXEC richiama un comando PCOS, il contenuto della espressione stringa 
dopo EXEC deve coincidere con il comando così come l’utente avrebbe 
dovuto impostarlo per eseguirlo in PCOS. 

Se l'istruzione EXEC richiama un sottoprogramma in linguaggio Assembler, 
il contenuto dell'espressione stringa dopo EXEC è una lista di parametri 
separati da virgole. 

11 primo specifica il nome del sottoprogramma ed i successivi specificano 
gli argomenti da passare al sottoprogramma. 

Nota: Gli argomenti non sono racchiusi in parentesi e possono solo essere 
costanti. 


Ese*pi 


VIDEO 


100 EXEC "pK ’# 


'RUN VI :CASHFLOW 


COMMENTI 


l'istruzione 100 permette di ri¬ 
chiamare da BASIC il comando PCOS 
pkey, per assegnare la stringa "RUN 
VI :CASHFLOW" al tasto # . 


150 EXEC "fp 1:MY.F1LE/SECRET" 


Si noti che le stringhe: 


180 A$="FN 1:F1LEA,15" 


- RUN VI:CASHFLOW 

devono essere racchiuse tra apici 
(') come se si operasse in PCOS. 
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SOTTOPROGRAMMI, 


Questo può essere un comando PCQ5 o BASlC r -un'espressione,-una costante o 
qualsiasi sequenza di caratteri da impostare frequentemente. 

L'assegnazione può essere fatta sia in un programma BASIC per mezzo della 
CALL "pkey" (o EXEC "pkey") o in PCOS per mezzo del comando pkey. 

A seconda delle vostre esigenze, l'assegnazione di una determinata fun¬ 
zione a un tasto può essere permanente (cioè questa funzione viene attri¬ 
buita in modo automatico all'accensione del sistema) oppure temporanea 
cioè disponibile fino allo spegnimento della macchina. Per ulteriori 
dettagli vedere "Professional Computer Operating System (PCOS) - Guida 
Utente". 
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Nota 


Se l'incremento è uguale a zero e il valore iniziale e il valore finale 
coincidono allora il loop non sarà affatto eseguito e il controllo passa 
alla prima istruzione eseguibile dopo la NEXT. 

Un ciclo FOR/NEXT può essere definito "pendente" (pending) se interotto 
da un "break" prima della sua conclusione. Qualsiasi modifica al 
programma residente (come ad esempio: cancellazione e modifica di linee 
e così via) impedirà la conclusione del ciclo. 


Incremento di Valore Positivo 


il 

è 


SE... 


ALLORA... 


valore dell'incremento 
positivo 


il ciclo FOR/NEXT viene eseguito 
finché il valore della variabile 
di controllo non è maggiore del 
valore finale. 


Ad esempio: 


LIST 
10 K=10 

20 FOR 1=1 TO K STEP 2 
30 PRINT 1; 

40 K=K+10 
50 PRINT K 
60 NEXT 
Ok 
RUN 


1 20 
3 30 

5 40 
7 50 

9 60 

Ok 


In questo caso il ciclo è ripetuto 
cinque volte 


► 
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SEGMENTAZIONE D EI PR OG RAMMI : 


QUANDO USARE LA SEGMENTAZIONE DEI PROGRAMMI _ 

La segmentazione dei programmi significa realizzare una successione di 
programmi semplici invece di un unico programma complesso. 

Questi programmi devono essere eseguiti uno dopo l'altro per risolvere lo 
stesso problema. Usando questa tecnica, l'utente può eseguire programma 
che altrimenti non potrebbero essere caricati nella memoria dell'M20, ma 
la segmentazione dei programmi è una tecnica che può essere utile anche 
in molti altri casi, alcuni dei quali sono indicati nella seguente 
tabella. 


SE. .. 


ALLORA... 

un programma non può essere con¬ 
tenuto nella memoria disponibile 


è necessario, per poterlo esegui¬ 
re, suddividerlo in due o più 
programmi più semplici, da esegui¬ 
re in tempi successivi 

un programma contiene delle parti 
che vengono eseguite raramente 


può essere opportuno codificare 
queste parti come programmi di¬ 
stinti da richiamare in memoria 
quando necessario 

un programma ha una parte che deve 
essere sempre residente, mentre 
altre parti possono risiedere in 
memoria in modo temporaneo (tipi¬ 
camente queste parti sono routine 
standard che possono essere utiliz¬ 
zate da molti programmi) 


può essere opportuno codificare 
queste parti come programmi di¬ 
stinti: il segmento che deve 
essere sempre residente ("radice") 
richiamerà in memoria per l'esecu¬ 
zione il primo segmento transiente 
(overlay). 11 secondo overlay 
verrà quindi richiamato in memoria 
o dal primo overlay o dalla stessa 
radice. 



Ognuno di questi overlay verrà 
ricoperto (tutto o in parte) dal 
successivo 

un programma è decomponibile in 
parti funzionali distinte 


può essere opportuno codificare 
queste parti come programmi di¬ 
stinti al' fine di ridurre i costi 
di programmazione 
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I cicli nidificati forniscono un metodo di programmazione molto utile 
per risolvere un'ampia gamma di problemi. Qui di seguito viene 
illustrato un esempio di ciclo nidificato. 


Eseapio 


VIDEO 


LIST 

10 REM PRIME NUMBERS 

20 INPUT "Enter limits N,M";N,M 

30 PR1NT "primes from";N;"TO";M 

40 PR1NT 

50 PR1NT 

60 POR I=N TO M 

70 LET K=SQR(1) 

80 POR J=2 TO K 
90 LET E=I/J-1NT(1/J) 

100 IF E=0 THEN 130 
110 NEXT J 
120 PRINT I; 

130 NEXT 1 
140 PRINT 
150 PRINT 

160 PRINT "End of List" 

170 END 

Ok 

RUN 

Enter limits N,M? 1,15 
Primes from 1 TO 15 

1 2 3 5 7 11 13 

End of List 
Ok 


COMMENTI 


sono visualizzati tutti i numeri 
primi compresi in un dato insieme. 
Un ciclo FOR/NEXT specifica l'in¬ 
sieme dei numeri presi in consi¬ 
derazione. Un secondo ciclo, nidi¬ 
ficato nel primo, contiene un 
algoritmo per determinare quali 
numeri dell'insieme specificato 
siano un numero primo. 

Per spiegare l'algoritmo: i numeri 
assegnati ad una variabile (in 
questo caso 1) sono divisi per un 
numero intero (in questo caso J) 
il cui valore è compreso tra 2 e 
la radice quadrata di I. Se il 
resto della divisione è uguale a 
0, I non è un numero primo. Viene 
allora generato il numero 1+1 e 
l'esecuzione viene ripetuta. La 
scelta della radice quadrata del 
valore finale viene effettuata 
poiché se vi sono fattori interi 
del numero I, essi saranno sempre 
collocati tra 2 e la radice 
quadrata di 1. 

Nota : L'istruzione 100 consente di 
uscire dal ciclo interno anche se 
J non è maggiore di K. E’ difatti 
possibile uscire da un ciclo 
quando una determinata condizione 
è soddisfatta. Non è invece possi¬ 
bile entrare nel "mezzo" di un 
ciclo. 
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SEGMENTAZIONE DEI PROGRAMMI 


CONCATENAMENTO PROGRAMMI 


Come abbiamo già visto, la segmentazione dei programmi può essere 

realizzata tramite: 

- le istruzioni CHAIN e COMMON 

- i comandi RUN e LOAD 

L'istruzione CHAIN, con tutte le sue opzioni, fornisce un mezzo potente 

e flessibile per la segmentazione dei programmi. 

L'istruzione CHAIN può essere utilizzata secondo tre modalità distinte: 

- insieme a una o più istruzioni COMMON, in modo da trasferire l'area 
common al programma concatenato 

- con l'opzione MERGE per poter inserire il programma concatenato nel 
programma residente in memoria (l'opzione DELETE viene spesso usata in 
questo caso per cancellare una parte del programma a fine esecuzione, 
consentendo così di eseguire una serie di "overlay") 

- con l'opzione ALL per passare tutte le variabili al programma 
concatenato 


CHAIN (PROGRAMMA) 

Consente di concatenare il programma specificato a quello attualmente in 
memoria consentendo il trasferimento delle variabili o CHAIN lascia i 
file dati aperti e mantiene l'impostazione dell'attuale 0PT10N BASE. 



Sintassi 11-1 Istruzione CHAIN 








Sintassi 8-7 Istruzione WH1LE 



Sintassi 8-8 Istruzione WEND 


Dove 
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ALL se l'istruzione CHAIN comprende l’opzione ALL, i 


valori di tutte le variabili del programma 
attualmente in memoria, vengono trasferiti al 
programma concatenato. 

Se l'opzione ALL non viene specificata, i dati 
vengono trasferiti tramite l'area "common" e/o 
tramite l'uso di file dati. 

DELETE specifica (tramite una coppia di numeri di 

linea) che una sezione del programma attualmente 
in memoria deve essere cancellata. 

La cancellazione avviene prima che il programma 
concatenato sia caricato in memoria. 

DELETE è spesso usato insieme con MERGE e line 
number expression per eseguire una sequenza di 
"overlay". 

Nota : 1 numeri di linea usati dopo DELETE 
vengono modificati se si esegue un comando 
RENUM. 












Note 


Non c'è limite al numero di cicli WHILE/WEND interni a un altro ciclo 
WHILE/WEND. Ogni istruzione WEND verrà associata alla istruzione WH1LE 
eseguita per ultima. Un'istruzione WH1LE a cui non corrisponda 
un'istruzione WEND causa l'errore "WH1LE without WEND", così come 
un'istruzione WEND a cui non corrisponda un'istruzione WH1LE causa un 
errore "WEND without WH1LE". 
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COMMON (PROGRAMMA)__ 

Definisce un'area common che non viene ricoperta dal programma concate¬ 
nato e permette il trasferimento delle variabili.. 



Sintassi 11-2 Istruzione COMMON 


VIDEO 


COMMENTI 


10 REM PG1 

20 COMMON Al,B1 ,C1 ,D1 $ 


80 CHAIN "V0L2:PG2" 
90 END 

10 REM PG2 
20 COMMON A2,B2,C2 
30 COMMON D2$ 


Le istruzioni COMMON vengono usate unitamente 
all'istruzione CHAIN. 

Un programma può avere una o più istruzione 
COMMON. 

le variabili specificate in queste istruzioni 
vengono allocate nell'area common a partire 
dall'inizio dell'area e secondo la sequenza di 
apparizione nel programma. 


120 END 


Il programma concatenato deve specificare, 
sempre tramite una o più istruzioni COMMON, lo 
stesso numero di variabili COMMON specificato 
dal programma concatenante e nella • stessa 
sequenza. 


11 nome delle variabili common nel programma 
concatenato può essere diverso dal nome delle 
corrispondenti variabili common nel programma 
concatenante, ma le variabili corrispondenti 
devono essere dello stesso tipo (intero, preci¬ 
sione, semplice o doppia, stringa). 
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12. GESTIONE DI UN FILE SU DISCO 



INSTR 


9-24 


LEFT$ 9-26 

LEN 9-27 

M1D$ 9-28 

OCT$ 9-29 

RIGHI$ 9-30 

SPACE$ 9-31 

STR$ 9-32 

STRING$ 9-33 

VAL 9-34 

FUNZIONI DI INPUT/OUT - 9-35 

PUT E FUNZIONI SPECIALI 
DI SISTEMA ~." 

DATE$/TIME$ 9-35 

CVD 9-37 

CVI 9-37 

CVS 9-37 

EOF 9-37 

ERL 9-37 

ERR 9-37 

LOC 9-37 

LPOS 9-38 

MKD$ 9-39 

MKI$ 9-39 

MKS$ 9-39 


POS 

9-39 

SPC 

9-39 

TAB 

9-40 

USR 

9-41 

DEF USR (PROGRAMMA/IM- 
MEDIATO) 

9-42 

VARPTR 

9-44 



GESTIONE DI UN FILE SU DISCO 


FILE SEQUENZIALI E AD ACCESSO DIRETTO 


Un file dati viene creato (cioè reso noto al sistema) tramite: 

- il comando PCOS fnew che ne stabilisce il nome e l'estensione iniziale, 
oppure 

- l'istruzione OPEN che consente di accedere al file da programma. 

L'istruzione OPEN attribuisce anche il nome a un file che non sia già 
stato creato tramite fnew o un'altra OPEN. In ogni caso OPEN associa un 
buffer dati al file (utilizzato dal programma per ogni operazione di 
Input/Output) e specifica il metodo d'accesso. 

Useremo il comando fnew invece dell'istruzione OPEN per creare un file, 
quando vorremo riservare un certo numero di settori contigui su disco al 
file. Ciò può rendere più efficienti le operazioni di Input/Output. 
Inoltre fnew garantisce che ci sia spazio necessario a contenere il file 
su disco. 

Dal punto di vista implementativo esiste un solo tipo di file (byte 
stream); ogni file può però essere aperto secondo quattro diversi metodi 
di accesso (Input, Output, Append e Random) - 1 primi tre permettono un 
accesso di tipo sequenziale (si parla quindi di file sequenziali), mentre 
l'ultimo ammette esclusivamente l'accesso random (si parla quindi di file 
ad accesso diretto). 

11 metodo d'accesso di un file può essere modificato ogni volta che il 
file viene riaperto. 

La seguente tabella riassume le caratteristiche fondamentali dei file 
dati. 


TIPO DI FILE 


Sequenziale (o 
"Stream-oriented 


CARATTERISTICHE 


un file sequenzia- 
") le è una sequenza 

di caratteri ASCII 
senza alcun crite¬ 
rio di raggruppa¬ 
mento 

11 numero di dati 
letti o registrati 
in ogni operazione 
di Input/Output 
può variare ed è 
di norma determi¬ 
nato dal numero di 
variabili specifi¬ 
cate nell’istru¬ 
zione 


METODO D’ACCESSO 


Input: lettura sequen¬ 
ziale (un dato dopo 
l'altro) dall’inizio 
del file 

Output : registrazione 
sequenziale dall'inizio 
del file 

1 dati presenti sul 
file sono persi 

Append: registrazione 

sequenziale dalla fine 
del file. 1 dati 
presenti nel file non 
sono persi 


► 
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delle funzioni utilizzando l'istruzione DEF FN. 11 nome di una 
funzione definita dall'utente inizia con FN e può essere qualunque 
nome valido di variabile. 

Tutte le funzioni devono essere definite prima di essere richiamate. 


Esempi : 


VIDEO 

COMMENTI 

10 A=X*S1N(X)+L0G(X) 

in questo caso SIN e LOG sono 
funzioni numeriche di sistema 


LIST 

10 DEF FNH(X,Y)=SQR(X*X+Y*Y) 
20 INPUT "S1DES";XI,Y1 
30 PR1NT "H=";FNH(X1 ,Y1 ); 

"X1=";X1;"Y1=";Y1 
40 GOTO 20 
Ok 
RUN 

S1DES? 3.5,1 .2 

H= 3.7 X1= 3.5 Y1= 1.2 

S1DES? 1.7,4 

H= 4.34626 XIa 1.7 Y1» 4 

SIDES? A C 
Break in 20 
Ok 


FNH è una funzione definita dal¬ 
l'utente. Essa viene definita 
dall'istruzione DEF FN (vedere 
l'istruzione 10), e calcola la 
radice quadrata della somma dei 
quadrati dei parametri X ed Y 
usando la funzione di sistema SQR. 

L'istruzione 30 richiama la fun¬ 
zione definita dall'utente attri¬ 
buendo due argomenti ai parametri 
corrispondenti. 

Nota : 1 nomi degli argomenti 
possono non coincidere con quelli 
dei parametri corrispondenti. 


FUNZIONI DEFINITE DALL'UTENTE 


Se si deve utilizzare ripetutamente una equazione di tipo numerico o 
stringa è molto più conveniente definire la stessa sotto forma di 
funzione. La funzione così definita può essere richiamata esattamente 
nello stesso modo delle funzioni di sistema. L'unico vincolo consiste 
nel fatto che la definizione è valida solo per quel determinato 
programma e deve quindi essere ridefinita in ogni programma che richiede 
la sua utilizzazione (a meno che il secondo programma non sia 
concatenato al primo mediante l'uso dell'opzione MERGE ). 
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GESTIONE DI UN FILE SU DISCO 


- i dati su un file sono sempre registrati come una stringa di caratteri 
(un byte per ogni carattere del dato). Per esempio il numero: 

351.27 

richiede 6 byte di memoria su disco, esclusi i delimitatori (che 
possono essere spazi o virgole) 


FILE AD ACCESSO DIRETTO 

Conviene utilizzare file ad accesso diretto quando è possibile raggrup¬ 
pare i dati in "record", aventi tutti una data lunghezza. 

1 file ad accesso diretto richiedono un maggior numero di passi di 

programma che non i file sequenziali, ma presentano vari vantaggi: 

- invece di iniziare a leggere o a scrivere un file dall'inizio, l’utente 
può leggere o scrivere un record qualsiasi dal file. 

- per aggiornare un file, non è necessario leggere l'intero file, 
aggiornare i suoi dati e scriverli su un altro file. L’utente può 
riscrivere o aggiungere un qualsiasi record senza dover accedere a 
tutti i record precedenti. 

- l'apertura di un file ad accesso diretto consente sia di scrivere che 
di leggere record dal file utilizzando lo stesso "buffer". 


APERTURA E CHIUSURA DI UN FILE 


Per accedere a un file dati da programma, l'utente deve aprirlo tramite 
un'istruzione OPEN. 

Questa specifica l'identificatore di un file, il metodo d'accesso, il 
numero dei file e, limitatamente ai file ad accesso diretto, la lunghezza 
dei record. 

11 massimo numero dei file aperti contemporaneamente, può essere 
stabilito tramite il comando PCOS sbasic, o può essere assunto per 
default (in quest'ultimo caso il suo valore è 3). 11 numero massimo non 
può mai superare 15. 

Ogni volta che l'utente apre un file, un buffer viene associato al file. 
Ogni buffer ha un numero compreso tra 1 e 15. 
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pa rameter 

una variabile "dummy" che dovrà essere rimpiaz¬ 
zata dal valore dell'argomento corrispondente 
quando la funzione viene richiamata. L'associa¬ 
zione argomenti/parametri e di tipo posizionale 
(cioè al primo argomento corrisponde il primo 
parametro e così via). 

argument 

il valore effettivo che dovrà essere attribuito 
al parametro corrispondente. Ogni argomento può 
essere una costante, una variabile o una 
espressione. 

expression 

una espressione che esegue l'operazione della 
funzione. 


11 tipo dell’espressione (numerico o stringa) 
deve coincidere con quello della funzione. 


L'espressione può includere variabili definite 
esternamente alla definizione della funzione 
(variabili globali). 


1 nomi di parametri che compaiono nell'espres¬ 
sione servono unicamente a definire la funzione 
e non influenzano eventuali variabili di pro¬ 
gramma che hanno lo stesso nome. Tuttavia, per 
una maggiore leggibilità del programma, si 
sconsiglia di dare lo stesso nome. 


Caratteristiche• 


SE. .. 


ALLORA... 

il tipo di un argo¬ 
mento non ha le stes¬ 
se caratteristiche del 
parametro corrispon¬ 
dente 


si verifica un errore di "type mismatch 
(incompatibilità di tipo) 

una funzione definita 
dall'utente viene 
richiamata prima dì 
essere definita 


si verifica l'errore di "funzione indefinita" 
(Undefined user function) 

-—-> 
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GESTIONE DI UN FILE SU DISCO 


• « 

file è sequenziale. I dati presenti sul file 
non vengono persi, i nuovi dati vengono 
aggiunti dopo quelli esistenti 

- "1" cioè Input : predispone la lettura 

sequenziale dei dati a partire dall'inizio dal 
file. 11 file è sequenziale 

- "0" cioè Output : predispone la registrazione 
sequenziale dei dati a partire dall'inizio del 
file. 11 file è sequenziale. Se il file 
conteneva già dei dati questi vengono persi. 

- "R" cioè Random : i record potranno essere 
letti o scritti in qualsiasi ordine. In questo 
caso il file è ad accesso diretto. 

N.B. Se un file sequenziale è vuoto (cioè non 
contiene dati) i metodi di accesso A e 0 
sono equivalenti 

file number 

è una espressione numerica, il cui valore 
(arrotondato all'intero più vicino) deve essere 
compreso tra 1 e 15. 

Il numero di file specificato rimane associato 
al file per tutto il tempo in cui il file resta 
aperto e viene usato per specificare il file in 
ogni istruzione di I/O 

file identifier 

è una costante o una variabile stringa e può 
specificare : 

- un file nuovo (cioè sconosciuto al sistema). 
In questo caso il file viene creato (ad 
esclusione dei file aperti con metodo d'acces¬ 
so "I”). 

- un file già esistente. In questo caso il file 
viene soltanto aperto. 

record length 

è un'espressione numerica (arrotondata all'in¬ 
tero più vicino) che, se specificata, stabilisce 
la lunghezza dei record di un file ad accesso 
diretto. 

Questo parametro può essere specificato solo per 
i file ad accesso diretto. Il suo valore di 
default è 256 byte. 

La lunghezza può variare da 1 a 4096 byte 
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Nota : In questo paragrafo descriveremo anche l'istruzione RANDOMIZE, 
perchè strettamente connessa alla funzione END. 

ABS 

Calcola il valore assoluto di una espressione numerica. 



Sintassi 9-3 Funzione ABS 

Esempio 

PR1NT ABS (7*(-5)) 

35 

Ok 

ATN 

Calcola 1'arcotangente dell'argomento. 

Il valore calcolato è espresso in radianti e si colloca nell'ambito di 
- Tf/2 e tr/2 (dove TT è 3.1415.. .) 
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GESTIONE DI UN FILE SU DISCO 


CLOSE (PROGRAMMA/1MMED1ATO) 

Chiude i file dati 



Sintassi 12-2 Istruzione CLOSE 


Dove 


ELEMENTO SINTATTICO 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato rappresenta il numero del buffer associato 
al file. Questo numero deve essere compreso tra 

1 e 15. Un'istruzione CLOSE senza parametri 
chiude tutti i file che erano stati aperti. 


Esempi 


VIDEO 


170 CLOSE# 2 


COMMENTI 


L'istruzione 170 
buffer numero 2. 
L'istruzione 290 
buffer numero 3,5 
L'istruzione 1200 


chiude il file associato 

chiude i file associati 
e 6 (se A vale 6). 
chiude tutti i file. 


250 A=6 


al 

ai 


290 CLOSE 3,5,A 


1200 CLOSE 
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C1NT 


Converte un qualsiasi argomento di tipo numerico in un intero arroton¬ 
dando la parte frazionaria (se la parte frazionaria è >.5 l'intero è 
arrotondato per eccesso, in caso contrario per difetto). 


-H CINT 


■o 



numeric 


) ' 

expression 

'V 


<>> 


Sintassi 9-6 Funzione CINT 


Esempio 

PR1NT CINT(45.67) 
46 
Ok 


Note 

Se l'argomento non è compreso tra i valori -32768 e 32767 si verifica un 
errore di "Overflow". 

Vedere anche le funzioni F1X e 1NT, che forniscono anch'esse valore 
interi. 


cos 


Calcola il coseno dell'argomento. 



o- 



numeric 


ì ' 

expression 

*\ 


o 


Sintassi 9-7 Funzione COS 
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GESTIONE DI UN FILE SU DISCO 


LETTURA DI UN FILE SEQUENZIALE 


Per leggere un file sequenziale l'utente deve aprirlo in Input ("1"). 

Le istruzioni INPUT# e LINE INPUT# consentono di leggere dati da un 
file sequenziale. 

INPUT # legge uno o più dati, separati da delimitatori, e li assegna ad 
una lista di variabili numeriche e/ò stringa. L'istruzione LINE INPUT# 
legge un'intera linea (fino al carattere ritorno a capo) e la assegna ad 
una variabile stringa. 

Oltre alle due istruzioni qui indicate, il BASIC consente di utilizzare 
due funzioni molto utili per il trattamento dei file sequenziali: 

- la funzione EOF: consente di verificare se è stata raggiunta la linea 
di un file e di evitare quindi una ulteriore lettura che darebbe luogo 
al messaggio d'errore: 

Input past end. 

- la funzione LOC : permette di conoscere il numero di settori (blocchi 
di 256 byte) che sono stati letti dal file da quando è stato aperto. 

Per leggere i dati da un file sequenziale, sono richiesti i seguenti 
passi di programma: 


PASSO AZIONE 

ESEMPI 

1 L'utente deve aprire 

il file, specificando 

"1" come metodo 

d'accesso. 

10 OPEN "I", #2,"DATA" 

2 L'utente può quindi leggere 

una serie di valori nume¬ 
rici e/o stringa dal file, 
utilizzando le istruzioni 

INPUT# e/o LINE INPUT# 

50 INPUT# 2,X$,Y$,Z 
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EXP 


Eleva a potenza la costante "e" al valore dell'argomento. 



0 



numeric 

,/ 

) ' 

expression 

\ 


•0 




Sintassi 9-9 Funzione EXP 


Esempio 

10 X = 5 

20 PR1NT EXP (X-1) 
RUN 

54.5982 

Ok 


Note 


11 valore dell'argomento deve essere 
visualizzato il messaggio di "Overflow"; 
numero massimo che la macchina può 
appropriato e l'esecuzione continua. 


^ 88.7228 altrimenti viene 

viene fornito come risultato il 
rappresentare con il segno 


La valutazione di EXP viene effettuata in singola precisione. 


FIX 


Calcola la parte intera dell'argomento (troncamento). 



0 


\ , 

numeric 

>t 

) ’ 

expression 

\ 


0 


Sintassi 9-10 Funzione FIX 


9-10 


LINGUAGGIO BASIC - MANUALE GENERALE 




GESTIONE DI UN FILE SU DISCO 


variabile 


è il nome della variabile che dovrà contenere un 
dato letto dal file 


Note 

A diversità dell'istruzione INPUT, l'istruzione INPUT # non visualizza 
alcun messaggio (?) quando viene eseguita. 


Caratteristiche 


SE... 

ALLORA... 

viene eseguita un’istru¬ 
zione INPUT# 

i dati vengono letti dal file in sequenza, 
cioè, quando il file viene aperto, il 
"pointer" del file viene posto all'inizio del 
file. 

Ogni volta che un dato viene introdotto, il 
"pointer" si sposta all'inizio del dato 
successivo. 

Se l'utente vuole rileggere il file dall'ini¬ 
zio, deve chiudere il file ed aprirlo di 

nuovo. 

l'utente vuole leggere 
dati senza generare 
errori 

deve conoscere il tipo (numerico o stringa) 
di ogni dato sul file. 1 dati sul file 
dovranno essere separati da opportuni delimi¬ 
tatori (vedi seguito) 

Dati numerici possono essere introdotti in 
variabili stringa. 

Se l’utente introduce un numero in una 
stringa e ne vuole poi il suo valore numerico 
effettivo, dovrà usare la funzione VAL ad 
evitare errori di incompatibilità di tipo. 

il BASIC sta per assegna¬ 
re un dato a una variabi¬ 
le numerica 

ignora eventuali spazi iniziali, caratteri di 
ritorno a capo e interlinea. 

Quando viene incontrato il primo carattere 
diverso dai precedenti, il BASIC assume di 
aver incontrato il primo carattere di un 
numero. 

11 numero termina quando viene ine;- ocn 
spazio, oppure un ritorno a c3po o una 







PR1NT FRE(X$) 
14542 
Ok 


FRE ("") prima di calcolare il numero di byte 
"garbage collection" (eliminazione degli spazi 
automaticamente questa operazione nel caso che 
della memoria utente. 


disponibili forza un 
vuoti). 11 BASIC fa 
si abbia saturazione 


1NT 


Dà l'intero più grande inferiore o uguale all'argomento. 



<i> 



numeric 


) 1 

expression 



<I> 


Sintassi 9-12 Funzione 1NT 


Esempi 

PR1NT 1NT(99.89) 
99 
Ok 

PR1NT 1NT(-12.11 ) 

-13 

Ok 


Note 

Si noti la differenza tra 1NT e F1X. In presenza di valori negativi per 
1NT il risultato è sempre inferiore o uguale all'argomento, mentre per 
FIX è sempre maggiore o uguale. 
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GESTIONE DI UN FILE SU DISCO 


la stessa istruzione assegnerà i seguenti 
valori: 

R$ = SUBROUT1NES 
S$ = SOTTOPROGRAMMI 
T$ = COME RICHIAMARLI? 


LINE 1NPUT#(PR0GRAMMA/1MM£DIAT0) 

Legge un'intera linea (fino al carattere di ritorno a capo) da un file 
sequenziale e la assegna ad una variabile stringa 


< 


LINE INPUT U 



file 

) * 

number 


o 



string 


) * 

variable 



Sintassi 12-4 Istruzione LINE INPUT# 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file nuruber 


è un'espressione numerica il cui valore intro¬ 
dotto specifica il numero del buffer associato 
con il file 

stringa variabile 


è il nome della variabile a cui sarà assegnata 
la linea 


Caratteristiche 


SE... 


viene eseguita un'i¬ 
struzione LINE INPUT# 


ALLORA... 


viene letta una linea di 
stringa specificata 


dati nella variabile 

► 
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RND 


Calcola un numero casuale compreso tra 0 ed 1 . La stessa sequenza di 
numeri casuali viene generata ogni volta che il programma viene 
eseguito, a meno che il generatore dei numeri casuali venga riinizializ- 
zato (vedere l'istruzione RAND0M1ZE). 



( 




numeric 

expression 

— Gh 


Sintassi 9-14 Funzione RND 


Dove 


ELEMENTO DI SINTASSI 


numeric expression 


< 0 

casua 


=0 ri 


SIGNIFICATO 


ricomincia la stessa sequenza 
li. 

pete l'ultimo numero generato 


di 


numeri 


>0 (oppure omesso, cioè RND) viene generato il 
prossimo numero casuale della sequenza 


Esempio 

10 FOR 1=1 TO 5 
20 PR1NT 1NT(RND*100 ) ; 
30 NEXT 
RUN 

8 25 77 68 7 

Ok 


Note 

Sebbene il numero venga chiamato casuale, esso viene in realtà estratto 
da un ciclo prefissato di numeri (circa un milione in tutto). 
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GESTIONE DI UN FILE SU DISCO 


Esempio 


VIDEO 


COMMENTI 

LIST 

10 INPUT "PROGRAM 1DENTIFIER";P$ 

20 OPEN "1",1,P$ 

30 K%=0 

40 1F EOF(1) THEN 80 

50 K%=K%+1 

60 LINE INPUT # 1,A$ 

70 GOTO 40 

80 PRINT P$ " 1S" K% "LINES LONG" 

90 CLOSE 

100 GOTO 10 

110 END 

OK 

RUN 

PROGRAM 1DENT1F1ER? VI :P1 

VI : PI 1S 350 LINES LONG 

PROGRAM 1DENT1FIER? VI:P2 

VI:P2 1S 1520 LINES LONG 

PROGRAM 1DENT1F1ER? # C 

Break in 10 

OK 


Questo programma conta il numero 
delle linee in un file programma in 
formato ASCII. 

Ogni linea termina con un ritorno a 
capo/interlinea, così la LINE 
INPUT # all'istruzione 60 legge 
un'intera linea alla volta nella 
variabile fittizia A$. La variabile 
intera K% conta le linee del 
programma. 


EOF 

Ritorna -1 (cioè vero )se è stata raggiunta la fine di un file sequen¬ 
ziale. 

E' opportuno usare EOF per verificare la fine del file mentre lo si 
legge, per evitare errori di "input past end" 



Sintassi 12-5 Funzione EOF 
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Note 


Se il generatore dei numeri casuali non è riinizializzato, la funzione 
RUN dà la stessa sequenza di numeri casuali ogni volta che il programma 
viene eseguito. Per modificare la sequenza dei numeri casuali per ogni 
esecuzione del programma, si ponga l'istruzione RAND0M1ZE all'inizio del 
programma e si modifichi l'argomento ad ogni esecuzione. 

Non si è limitati a numeri casuali compresi tra 0 ed 1 . Per generare la 
sequenza tra A e B si usi la formula 

FIX(B+1-A)*RND+A) 


Esempi 

10 RANDOMIZE 
20 POR 1=1 TO 5 
30 PR1NT RND; 

40 NEXT 1 
RUN 

Random Number Seed (-32768 TO 32767)? 3 (l'utente digita 3 B22E) 

.88598 .484668 .586328 .119426 .709225 
Ok 
RUN 

Random Number Seed (-32768 to 32767)? 4 (l'utente digita 4 per una 

nuova sequenza) 

.803506 .162462 .929364 .292443 .322921 

Ok 
RUN 

Random Number Seed (-32768 to 32767)? 3 (stessa sequenza della prima 
esecuzione) 

.88598 .484668 .586328 .119426 .709225 
Ok 


SGN 

Dà 1 se l'argomento è positive, 0 se è uguale a zero e -1 se è negativo. 


9-16 


LINGUAGGIO BASIC - MANUALE GENERALE 



GESTIONE DI UN FILE SU DISCO 


Esempio 

200 1F L0C(2)>30 THEN STOP 


SCRITTURA DI UN FILE SEQUENZIALE 


11 file deve essere aperto con metodo d'accesso Output ("0") o Append 
("A") 

Le istruzioni di Output sono PR1NT #, PR1NT # USING e WR1TE #. 

PR1NT # e WRITE#scrivono i dati in un formato standard, mentre PR1NT# 
USING scrive i dati in un formato definito dall'utente. 

La differenza tra PR1NT # e URITE # è che: 

- PR1NT # registra su disco i dati nello stesso formato standard col 
quale l'istruzione PR1NT li visualizza su video. 

- WRITE # registra su disco i dati nello stesso formato standard col 
quale l'istruzione URITE li visualizza, cioè inserisce una virgola tra 
un dato e il successivo ed inoltre registra il carattere virgolette 
davanti e alla fine di ogni valore stringa. 

Nota : Può essere usata la funzione LOC per trovare il numero di set; ri 
(blocchi di 256 byte) registrati nel file da quando è stato aperto, al 
fine di evitare il messaggio d'errore "Disk full" 

I seguenti passi di programma sono necessari per scrivere dati su un file 
sequenziale. 


PASSO 


AZIONE 


ESEMPI 

1 


L'utente deve aprire il file 
specificando il metodo d'accesso 
"0" oppure "A" 


10 OPEN "0",1,"1:F1"- 

2 


L'utente deve scrivere una 
serie di valori numerici 
e/o stringa sul file, usando 
delle istruzioni di Output 


50 WRITE#1 ,A$,B,C$ 





-ih- 


12-17 



Note 


Si assume che il valore dell'argomento sia quello di un angolo 
in radianti. 

SIN viene valutato in singola precisione. 


SQR 


Calcola la radice quadrata dell'argomento. 



< 3 > 



numeric 


) * 

expression 

*\ 


<>> 


Sintassi 9-18 Funzione SQR 


Esempio 


10 FOR X = 

10 TO 25 STEP 

20 PR1NT X, 

, SQR(X) 

30 NEXT 


RUN 


10 

3.16228 

15 

3.87298 

20 

4.47214 

25 

5 


Ok 

Note 

L'argomento deve essere maggiore o uguale a zero, altrimenti 
messaggio "lllegal function cali”. SQR viene valutata in 
precisione. 

TAN 


Calcola la tangente dell'argomento 


misurato 


si ha il 
singola 
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GESTIONE DI UN FILE SU DISCO 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file. 

expression 

può essere un'espressione numerica, di relazio¬ 
ne, logica o stringa, il cui valore viene 
registrato sul file. 


Note 

Poiché i dati vengono registrati su disco nello stesso formato in cui 
apparirebbero su video con l'istruzione PR1NT, l'utente deve fare 
attenzione a registrare i dati con gli opportuni delimitatori in modo da 
poterli poi rileggere in modo corretto. 


Caratteristiche 


SE... 

ALLORA... 

viene eseguita un'istru¬ 
zione PR1NT# 

i dati vengono registrati in modo sequenziale 
syl file specificato 

il file viene aperto 
in Output ("0") 

il pointer viene posto all'inizio del file, 
quindi la prima PR1NT # registra i dati a 
partire dall'inizio del file 

Ad ogni operazione PR1NT # ,il pointer avan¬ 
za, sicché i valori vengono registrati in 
sequenza 

il file viene aperto in 
Append ("A") 

il pointer è posto alla fine, quindi la prima 
PRINT # registra i dati dopo l'ultimo dato 
presente nel file. Ad ogni operazione 
PRINT # il pointer avanza, sicché i valori 
sono registrati in sequenza 
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ASC 


Calcola un valore numerico che è il codice decimale ASCII del primo 
carattere di una stringa data. 



o 


s » 

string 

r / 

ì * 

expression 

'V 


<s> 


Sintassi 9-20 Funzione ASC 


Esempio 

10 X$ = "TEST" 

20 PR1NT ASC(X$) 
RUN 
84 
Ok 


Note 

Se il valore dell'argomento è la stringa nulla, si verifica un errore 
(lllegal function cali). 

Vedere la funzione CHR$ per la conversione da codice decimale ASCII a 
carattere. 


CHR$ 


Calcola una stringa di un carattere il cui codice decimale ASCII è il 
valore dell'argomento. 


\ ,/ 7 \ . 

numeric 


expression 



Sintassi 9-21 Funzione CHR$ 
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GESTIONE DI UN FILE SU DISCO 


1 2 3 


con la virgola, sarà: 


1 


l'utente vuole regi¬ 
strare valori stringa 


deve inserire, in modo esplicito dei delimitato¬ 
ri se vuole leggere quei valori come stringhe 
distinte (tramite la INPUT # ) 


l'utente vuole regi¬ 
strare dei valori 
stringa che non con¬ 
tengono virgole, pun¬ 
ti e virgola, spazi 
iniziali e finali si¬ 
gnificativi, ritorno 
a capo o interlinee 


deve usare una virgola, espressa come costante 
stringa (",") per separare le espressioni 
stringa nella PR1NT # . In questo modo anche i 
dati su disco verranno separati con una virgola 
e potranno quindi essere riletti come stringhe 
distinte tramite un'istruzione INPUT# 

Per esempio: 


LIST 

10 OPEN ”0", #1 ."DATAI" 
20 A$="CAMERA" 

30 B$="93605-2" 

40 PR1NT# 1 ,A$;B$ 

50 CLOSE #1 

60 OPEN ”1", #1 ."DATAI" 
70 INPUT #1, Al $ 

80 PR1NT Al $ 

90 CtOSE #1 
100 END 
OK 
RUN 

CAMERA93605-2 

OK 

40 PR1NT#1,A$;",";B$ 

70 INPUT #1 , Al $, B1 $ 

80 PRINT Al $,B1$ 

RUN 

CAMERA 93605-2 

OK 


Se l'utente separa A$ e B$ con un punto e 
virgola nell'istruzione 40, la stringa di 
caratteri registrata su disco sarà: 


CAMERA93605-2 


► 
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Dove 


ELEMENTO DI SINTASSI 

1 

SIGNIFICATO 

numeric expression 


l'espressione numerica è arrotondata all'intero 
più prossimo prima che la funzione HEX$ venga 
valutata 


Esempio 

10 INPUT X 
20 A$ = HEX$(X) 

30 PR1NT X "DEC1MAL 1S " A$ " HEXADEC1MAL 
RUN 
? 32 

32 DECIMAI. IS 20 HEXADECIMAL 
Ok 


Note 

Si veda la funzione 0CT$ per la conversione ottale. 


INKEY$ 


Calcola una stringa di un carattere: questo è il primo carattere 
impostato in tastiera oppure è la stringa nulla se non vi sono caratteri 
impostati in attesa di essere elaborati. Nessun carattere verrà 
visualizzato e tutti i caratteri verranno inoltrati al programma eccetto 
per K*3 che interrompe l'esecuzione del programma. 



INKEYS 


> 




Sintassi 9-23 Funzione INKEYS 
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GESTIONE DI UN FILE SU DISCO 


CAMERA 


alla variabile A$ e la stringa 
AUTOMATIC 93605-2 

alla variabile B$. Questo si può verificare 
tramite l'istruzione 80 quando si esegue il 
programma per la prima volta. Se l'utente 
modifica l'istruzione 40 come indicato, la 
stringa registrata su disco sarà: 

"CAMERA, AUTOMATIC"" 93605-2" 

e l'istruzione 70 assegnerà la stringa: 

"CAMERA, AUTOMATIC" 

alla variabile A$ e la stringa: 

" 93605-2" 

alla variabile B$. Questo si può verificare con 
l'istruzione 80, quando si esegue il programma 
per la seconda volta. 


PR1NT# US1NG (PROGRAMMA/1MMEDIATO) 

Registra dati su un file sequenziale, usando lo stesso formato definito 
dall'utente utilizzato da un'istruzione PR1NT USINO sul video 



Sintassi 12-7 Istruzione PRINT # US1NG 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

length 


espressione numerica arrotondata all'intero più 
prossimo. Specifica la lunghezza della stringa 

file number 


è il numero di buffer associato al file 


Esempi 


VIDEO 

COMMENTI 

10 OPEN'T’,1 ,"DATA" 

20 IF EOF (1) THEN 50 

30 PR1NT HEX$(HEX$(ASC(INPUT$(1,#1))); 

40 GOTO 20 

50 PR1NT 

60 END 

Questo programma pro¬ 
duce un listing di un 
file sequenziale in 
caratteri esadecimali 

110 X$=1NPUT$ (1 ) 

120 IF X$="P" THEN 500 

130 IF X$="S" THEN 700 ELSE 100 

Impostare P per conti¬ 
nuare ed S per arre¬ 
stare 1 ’ esecuzione 


INSTR 


Ricerca la prima occorrenza di una scttostringa in una stringa e dà la 
posizione in cui essa viene individuata. 



Sintassi 9-25 Funzione INSTR 
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GENERALE 














GESTIONE DI UN FILE SU DISCO 


< 


WRITE # 


\ * 

file 


) ' 

number 

'V 


O-H 


ex p ressi on 


o 


Sintassi 12-7 Istruzione WR1TE# 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 

expression 

può essere un'espressione numerica, di relazio¬ 
ne, logica o stringa, il cui valore viene 
registrato sul file 


Note 

Non è necessario inserire dei delimitatori espliciti nella lista di 
un'istruzione URITE# 

Se l'utente vuole registrare una stringa che contiene il carattere 
virgolette ("), deve usare l'istruzione PR1NT # invece dell'istruzione 
WR1TE # . 
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Esempio 


VIDEO 


COMMENTI 


LIST 

10 OPEN "0",1,"DATA2" 
20 A$="CAMERA" 

30 B$="93605~2" 

40 WRITE #1,A$,B$ 

50 CLOSE #1 

60 OPEN "I",1 ,"DATA2" 

70 1NPUT#1 ,A$,B$ 

80 WRITE A$,B$ 

90 CLOSE #1 
100 END 
OK 
RUN 

"CAMERA",'*93605-2" 

OK 


L'istruzione 40 registra la seguente stringa su 
disco: 

"CAMERA","93605-2" 

L'istruzione 70 assegna "CAMERA" alla variabile 
A$ e "93605-2" alla variabile B$. Questo si può 
verificare con l’introduzione 80 


LOC 

Nel caso di file sequenziale, LOC ritorna il numero di settori (blocchi 
di 256 byte) letti da/registrati su file da quando è stato aperto (si 
veda il paragrafo "Lettura di un file sequenziale"). 


AGGIORNAMENTO DI UN FILE SEQUENZIALE 


Per aggiornare un file sequenziale, l'utente deve leggere l'intero file e 
quindi registrare i dati aggiornati su un nuovo file di output, come 
indicato nella tabella che segue: 


PASSO 


AZIONE 

1 


L'utente deve aprire il file sequenziale da aggiornare 

2 


L'utente deve aprire un nuovo file sequenziale 
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GESTIONE DI UN FILE SU DISCO 


3 

L'utente deve leggere una lista di dati e aggiornarli come 
richiesto 

4 

L'utente deve registrare i dati aggiornati sul nuovo file 

5 

L'utente deve ripetere i passi 3 e 4 fino a quando tutti i dati 
sono stati letti, aggiornati e registrati sul nuovo file; quindi 
andare al passo 6 

6 

L'utente deve chiudere entrambi i file a meno che non debbano 
essere riutilizzati con lo stesso metodo d'accesso da un altro 
programma concatenato) 


DEFINIZIONE DEL FORMATO DI UN RECORD 

Dopo l'apertura di un file ad accesso diretto l'utente deve definire il 
formato del record tramite un'istruzione F1ELD # . L'istruzione F1ELD 
organizza il buffer del file ad accesso diretto in modo che diventa 
possibile passare dati da programma a disco e viceversa. 

Il record può essere suddiviso in più campi tramite un'istruzione 
FIELD#, ma il numero totale di byte allocati in un'istruzione FIELD# 
non deve superare la lunghezza del record determinata al momento 
dell'apertura del file. Diversamente si verifica un errore per Field 
overflow". La lunghezza di default del record è 256 byte). 

L'istruzione FIELD # stabilisce la dimensione di ciascuno di questi campi 
e consente ai nomi delle variabili stringa di puntare a ciascun campo. 1 
nomi di questi campi, diversamente dalle stringhe ordinarie che puntano 
ad un'area in memoria chiamata "spazio stringa", puntano all'area del 
buffer associato al file. 

Tutti i dati, stringa e numeri, devono essere posti nel buffer in formato 
stringa. Esistono tre paia di funzioni (MK1$/CVI,MKS$/CVS,MKD$/CVD) per 
convertire i numeri in stringa e viceversa. 

Nota: Non è possibile utilizzare il nome di un campo in un'istruzione 
INPUT, o sul lato sinistro di un'istruzione LET. Quel nome non punterebbe 
più al campo nel buffer, ma allo spazio stringa; quindi non sarebbe 
possibile per l'utente accedere a quel campo utilizzando il nome 
precedentemente assegnatogli. 
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F1ELD # (PROGRAMMA/IMMEDIATO) 

Definisce i campi nel buffer di un file ad accesso diretto 



Sintassi 12-8 Istruzione F1ELD# 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 

field width 

è il numero di byte da allocare nel campo. 

Un byte corrisponde ad un carattere 

field nane 

è il nome stringa da assegnare al campo definito 
da "field width" 


Esempi 


VIDEO 

20 F1ELD #1,15 AS NAME$,20 AS C$, 
10 A5 P$ 

80 NAME$=B$ (Wrong) 

100 LSET NAME$=B$ (right) 
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COMMENTI 


L'istruzione 20 alloca le prime 15 
posizioni (byte) del buffer # 1 al 
campo di nome NAME$, le successive 
20 al campo di nome C$ e le ultime 
10 al campo di nome P$ 

Dopo l'esecuzione dell'istruzione 
80, NAME$ diventa un nome ordinario 
di una variabile stringa. L'utente 
non ha più la possibilità di 
accedere al primo campo del buffer. ^ 
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GESTIONE DI UN FILE SU DISCO ; 


30 F1ELD #2,128 AS NI $, 128 AS N2$ 


100 F1ELD# 2,128 AS N3$,100 as N4$, 
28 AS N5$ 


50 F1ELD #3,16 AS K$(1 ) ,112 AS L$(1 


90 F1ELD# 3,128 AS DUMMY$, 
16 AS K$(2),112 AS L$(2) 


L'utente deve invece usare l'istru¬ 
zione 100 ( si vedano di seguito le 
istruzioni LSET/RSET) 


L'utente può usare F1ELD # tante 
volte quante vuole per "riorganiz¬ 
zare" il buffer di un file 

La riorganizzazione di un buffer 
mediante l'istruzione F1ELD # non 
cancella i contenuti del buffer; 
viene cambiato soltanto il modo di 
accedere al buffer (tramite i nomi 
dei campi). Così due o più nomi di 
campi possono fare riferimento 
alla stessa area del buffer. 


) In un'istruzione F1ELD # l'utente 
può utilizzare una variabile fitti- 
zia per "saltare" una parte del 
buffer e iniziare la strutturazione 
del buffer da quel punto 

Nella seconda istruzione F1ELD #, 
DUMMY$ serve a spostare la posizio¬ 
ne d'inizio di K$(2) alla posizione 
129 del buffer 


Nota 


E' buona norma che la somma di tutte le dimensioni dei campi sia uguale 
alla lunghezza del record stabilita dall'istruzione OPEN. In ogni caso 
questa somma non deve superare la lunghezza del record, diversamente si 
verifica un errore per "Field overflow". 


LETTURA DI RECORD DA UN FILE AD ACCESSO DIRETTO 

Per leggere record da un file ad accesso diretto, 1 utente deve aprire il 
file, specificando "R" come metodo d’accesso. L’istruzione GET # consente 
la lettura dei record. 

GET # specifica sia il numero del file che il numero del record da 
leggere. Con l'esecuzione di una GET#, i contenuti del record specifica- 
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to vengono trasferiti nel buffer del file. 

Per accedere ad un singolo dato memorizzato nel buffer tramite il nome 
del campo) l'utente può usare: 

- un'istruzione LET (se vuole assegnarlo a una variabile programma), o 

- un'istruzione PR1NT, PR1NT US1NG, LPR1NT, o LPR1NT US1NG (se vuole 
visualizzarlo o stamparlo) 

Nota: Se l'utente vuole assegnare, visualizzare o stampare il nome di un 
campo da convertire in un numero deve effettuare la conversione usando la 
funzione CV1, o CVS o CVD 

Nota: La funzione LOC ritorna il numero del record corrente (cioè il 
numero del record che segue l'ultimo record letto) 

Per leggere i dati da un file ad accesso diretto, sono richiesti i 
seguenti passi di programma: 


PASSO 

_ AZIONE 

ESEMPI 

1 

L'utente deve aprire il file 
specificando "R" come metodo 
d'accesso e (opzionalmente) 
la lunghezza del record 

10 OPEN "R",#2,"1 :D1R",22 

2 

L'utente deve struttura¬ 
re il buffer tramite la 

FIELD # 

20 F1ELD#2,15 AS A$,5 AS B$,2 AS 
C$ 

3 

L'utente può quindi legge¬ 
re un record dal file 

100 GET#2,A 

4 

L'utente può estrarre i 
dati dal buffer o con l'i¬ 
struzione LET o con l'istru¬ 
zione PR1NT (PR1NT US1NG). 

1 valori numerici (memo¬ 
rizzati in formato stringa 
all'interno del buffer) 
devono essere convertiti 
in numeri usndo le fun¬ 
zioni di "conversione": 
evi, CVS e CVD 

100 Al$=A$ 

120 PR1NT B$ 

130 I%=CV1(C$) 
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GESTIONE DI UN FILE SU DISCO 


5 

L'utente può continuare 
a leggere un altro re¬ 
cord ripartendo dal passo 

3. Diversamente, deve 
andare al passo 6 

— 


6 

Quando ha finito di 
leggere i suoi dati l'u¬ 
tente chiuderà il file 
(a meno che voglia con¬ 
catenare un altro pro¬ 
gramma che debba leggere 
dati dallo stesso file 
con lo stesso metodo 
d'accesso) 


500 CL0SE#2 


Nota: In un programma che esegue sia operazioni di input che di output 
sullo stesso file ad accesso diretto, l'utente spesso può utilizzare una 
sola istruzione OPEN e una sola istruzione FIELD# 


GET#(PR0GRAMMA/1MMED1AT0) 

Legge un record da un file ad accesso diretto 


r > 

1 _. 



►(get) ^ 

L 

file 

number 

—► 

record 

number 

A 


Sintassi 12-8 Istruzione GET# 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 
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record number 


è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del record da leggere 
(cioè da trasferire nel buffer). Se omesso, 
viene letto il record corrente. 


11 numero minimo di record è 1, il numero 
massimo è 32767 

Nota: 11 record corrente è il record il cui 
numero supera di uno quello dell'ultimo record 
selezionato. 

La prima volta che l'utente accede a un file ad 
accesso diretto (senza specificare il numero del 
record) il numero del record corrente è definito 
uguale a 1 


Esempi 


VIDEO 


COMMENTI 

LIST 


Questo programma ricer- 

10 OPEN "r", 1 ,"1 :RAND",48 


ca le informazioni me- 

20 FIELD 1,20 AS RI $,20 AS R2$,8 AS R3$ 


morizzate nel file spe- 

30 FOR L=1 TO 4 


cificato. I dati letti 

40 GET 1 ,L 


nel buffer sono accedi- 

50 PRINT R1$,R2$,CVD(R3$) 


bili da programma. Ciò 

60 NEXT 


avviene in questo caso 

70 CLOSE 1 


tramite l'istruzione 

80 END 


PRINT (si veda l'istru- 

OK 


zione 50). 

RUN 


Si suppone che i dati 

Super man USA 11234621 


siano stati registrati 

robin hood England 23462101 


in precedenza sul file 



tramite l'istruzione 

OK 


PUT # (vedi seguito). 
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GESTIONE DI UN FILE SU DISCO 


cvi/cvs/cvo _ __ __ ___ 

Convertono valori stringa in valori numerici 

CV1 converte una stringa di 2 caratteri in un intero 

CVS converte una stringa di 4 caratteri in un numero in singola precisio¬ 
ne 

CVD converte una stringa di 8 caratteri in un numero in doppia precisione 

I 

Sintassi 12-9 Funzione CV1 




Sintassi 12-10 Funzione CVS 



Sintassi 12-11 Funzione CVD 
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Esempi 


10 X#=CVD(N$) 
20 Y!=CVS(R1$) 


LOC 

Nel caso di file ad accesso diretto, la funzione LOC fornisce il numero 
del record appena letto tramite un'istruzione SET# , o ritorna il numero 
del record appena registrato tramite un'istruzione PUT# 



Sintassi 12-12 Funzione LOC 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica arrotondata all'intero 
più vicino. E’ il numero del buffer associato al 
file. 

Esempi 

VIDEO 

COMMENTI 

10 OPEN "R",2,"TQWNS",80 

20 F1ELD 2,20 AS FI $,20 AS F2$, 

20 AS F3$, 20 AS F4$ 

100 A$="M1LAN" 

110 GET 2,Y 

120 Y=Y+1 

In questo caso F1 $ è il numero di un 
campo. Se il valore di F1 $ è lo stesso 
di A$, viene visualizzato il numero 
del record nel quale è stato trovato. 
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GESTIONE DI UN FILE SU DISCO 


130 1F FI$=A$ THEN PR1NT 

"FOUND IN RECORD";LOC(2) : 
CLQSE:END 
140 GOTO 110 


REGISTRAZIONE DI RECORD SU UN FILE AD ACCESSO DIRETTO 

Per registrare record su un file ad accesso diretto, 1 utente deve aprire 
il file, specificando "R" come metodo d'accesso. 

L'istruzione PUT#gli consente poi la registrazione dei record. 11 
contenuto del record deve essere stato preparato nell'ambito del buffer 
ad accesso diretto prima dell'esecuzione dell'istruzione PUT #, tramite 
le istruzioni LSET o RSET. Le istruzioni LSET e RSET muovono i dati 
dalla memoria al buffer del file ad accesso diretto allocando le 
espressioni stringa nei campi predefiniti. 

Se l'espressione stringa utilizza meno byte di quelli che l'utente ha 
allocato nell'istruzione FlELD#lo spazio allocato in più viene riempito 
con caratteri blank. Essi possono essere destinati a sinistra o a destra 
del valore dell'espressione stringa. L'allineamento a sinistra inizia 
nella prima posizione del campo. L'allineamento a destra termina 
nell'ultima posizione del campo. Quando l’utente deve trasferire valori 
numerici nel buffer, deve convertirli in stringa tramite le funzioni 
MK1$, MKS$ e MKD$. 

Nota: La funzione LOC ritorna il numero del record corrente (cioè il 
numero del record che segue l'ultimo record registrato). 

Per registrare record su un file ad accesso diretto, sono richiesti i 
seguenti passi di programma: 
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PASSO AZIONE 

ESEMPI 

1 L'utente deve aprire 

il file, specificando 

"R" come metodo d'ac¬ 

cesso e (opzionalmen¬ 
te) la lunghezza del 
record 

10 OPEN "R", #1 ,"1 :D1R",22 

2 L'utente deve strut¬ 

turare il buffer tra¬ 
mite una F1ELD# 

20 F1ELD#1,15 AS A$,5 AS B$, 

2 AS C$ 

3 L'utente può quindi 

inserire i dati nel 
buffer 

100 LSET A$="J0HN JONES" 

110 LSET B$="U.K." 

120 LSET C$=MKl$m) 

4 L'utente può registrare 

un record sul file 

130 PUT #1,5 

5 L'utente può continuare 

a registrare un altro 
record ripartendo dal 
passo 3. Diversamente 
deve andare al passo 6 


6 Quando ha finito di re¬ 

gistrare i suoi dati l'u¬ 
tente chiuderà il file 
(a meno che voglia conca¬ 
tenare un altro program¬ 
ma che debba utilizzare 
lo stesso file con lo 
stesso metodo d'accesso) 

150 CLOSE #1 


LSET/RSET (PR0GRAMMA/1MMED1AT0) 

L5ET memorizza un valore stringa allinea a sinistra in un campo del 
buffer ad accesso diretto, o allinea a sinistra un valore stringa in 

una variabile stringa 

RSET memorizza un valore stringa allineato a destra in un campo del 
buffer ad accesso diretto o allinea a destra un valore stringa in una 

variabile stringa 
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GESTIONE DI UN FILE SU DISCO 



Sintassi 12-13 Istruzione LSET/RSET 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

field name 

è una variabile stringa che specifica il nome di 
un campo di un buffer ad accesso diretto 

string variabile 

è il nome di una variabile stringa ordinaria 

MK1$/MKS$/MKD$ 

sono le funzioni che convertono un intero 
(MK1$), o un valore in singola precisione 
(MKS$), o in doppia precisione (MKD$) in valore 
stringa 

string expression 

è la stringa da allineare a sinistra o a destra 
in un dato campo 

numeric expression 

è il valore numerico da convertire in stringa e 
allineare a sinistra o a destra in un dato campo 
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Esempi 


VIDEO 


10 OPEN "R",#1:MYF11E/MYPASS",20 
20 FIELD# 1,10 AS N1$,10 AS N2$ 

30 LSET NI$="CHARLES" 

40 LSET N2$="JAMES" 


COMMENTI 


Le istruzioni 30 e 40 assegnano i 
dati sul buffer # 1 come segue: 


CHARLES 


100 RSET NI$="CHARLES' 
110 RSET N2$="JAMES" 


200 LSET NI$="CHARLES THOMSON" 


JAMES 


Le istruzioni 100 e 110 assegnano 
i dati nel buffer come segue: 


CHARLES 


JAMES 


L'istruzione 200 assegna i dati 
nel buffer come segue: 


CHARLES TH 


Nota : Se una stringa è troppo 
lunga e quindi non può essere 
contenuta nel campo del buffer 
specificato, viene troncata sulla 
destra, indipendentemente dal 
fatto che sia stata usata l'i¬ 
struzione LSET o RSET 
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GESTIONE DI UN FILE SU DISCO 


110 

120 


A$=SPACE$(20) 
RSET A$=N$ 


Le istruzioni LSET e RSET possono 
anche essere utilizzate con una 
variabile non associata all'i¬ 
struzione F1ELD # per l'allinea¬ 
mento a destra o a sinistra di 
una stringa in unn dato campo. 
Questa può essere una utile 
tecnica di formattazione per le 
operazioni di stampa. 


Nell'esempio posto a sinistra 
l'istruzione RSET allinea a de¬ 
stra la stringa N$ in un campo di 
20 caratteri 


LOC 

Nel caso di file ad accesso diretto , la funzione LOG ritorna il numero 
del record appena letto tramite un'istruzione GET # o il numero del 
record appena registrato tramite un'istruzione PUT # (si veda il 
paragrafo sopra descritto "Lettura di Record da un File ad Accesso 
Diretto"). 


MK1$/MKS$/MKD$ 

Queste funzioni cambiano un numero in una stringa. 

La funzione MK1$ converte un intero in una stringa di 2 caratteri 

La funzione MKS$ converte un valore in singola precisione in una stringa 
di 4 caratteri 

La funzione MKD$ converte un valore in doppia precisione in una stringa 
di 8 caratteri 



Sintassi 12-14 Funzione MK1$ 
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I 

} 


Sintassi 12-15 Funzione MKS$ 



doubìe 

precision 

expression 


K> 



Sintassi 12-16 Funzione MKD$ 


VIDEO 


COMMENTI 

30 LSET D$=MK1$(1%) 


11 campo D$ deve ora contenere una 
rappresentazione di due byte del¬ 
l'intero 1 % 

100 STR4C$=MKS$(SPV) 


Una funzione "make" (MK1$, MKS$, 
MKD$) deve essere necessariamente 
utilizzata con le istruzioni LSET e 
RSET. In questo caso SPV è il nome 
di una variabile in singola preci¬ 
sione che viene convertita in una 
stringa di 4 caratteri e assegnata 
alla variabile stringa STR4C$. 


PUT # (PR0GRAMMA/1MMED1AT0) 

Registra su un file ad accesso diretto i dati prelevati dal buffer 
associato al file. 
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GESTIONE DI UN FILE SU DISCO 


f-1 


i 

r 



-►^PUT^ "* 

file 

number 

J 


record 

number 



Sintassi 12-17 Istruzione PUT# 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file number 


è un'espressione numerica che specifica il- 
numero del buffer associato al file 

record number 


è un'espressione numerica che specifica il 
numero del record nel file. 11 numero minimo di 
record è 1 , il numero massimo è 32767. In caso 
di omissione di questo parametro viene registra¬ 
to il record corrente. 



Nota: 11 record corrente è il record il cui 
numero è più alto di uno rispetto a quello 
dell'ultimo record selezionato. La prima volta 
che l'utente accede a un file ad accesso 
diretto, il numero del record corrente è 
definito uguale a 1 
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Esempi 
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GESTIONE DI UN FILE SU DISCO 


AGGIORNAMELO DI RECORD DI UN FILE AD ACCESSO DIRETTO 

Per aggiornare un file ad accesso diretto, l'utente deve leggere ogni 
record da aggiornare e quindi registrarlo, come indicato nella tabella 
che segue. 


PASSO 

AZIONE 

1 

L'utente deve aprire il file ad accesso diretto 

2 

L'utente deve strutturare il buffer in campi 

3 

L'utente deve leggere il record da aggiornare 

4 

L'utente deve estrarre i dati dal buffer per visualizzarli o 
assegnarli a variabili di programma 

5 

L'utente deve inserire i nuovi valori nei campi del buffer 

6 

L'utente deve registrare il record aggiornato 

7 

L'utente può aggiornare un altro record, ripartendo dal passo 3. 
Diversamente, deve andare al passo 8 

8 

L'utente deve chiudere il file (a meno che non debba essere 
riutilizzato con lo stesso metodo d'accesso da un altro 
programma concatenato) 


Esempio 


VIDEO 


LIST 

10 OPEN "r",1,"1:filetext",128 
20 F1ELD 1,128 AS A$ 

30 INPUT "record number ";RNUM 
40 GET 1,RNUM 
50 PR1NT AS 

60 INPUT "give me data ";PP$ 

70 LSET A$="new data —"+PP$ 


COMMENTI 


L'istruzione 10 apre un file ad 
accesso diretto, chiamato filetext 
e residente sul disco inserito 
nell'unità 1 

L'istruzione 20, in questo caso, 
specifica soltanto un nome di campo 
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80 PUT 1,RNUM 

90 INPUT "CONTINUE 

100 IF R$="y" THEN 

110 CLOSE 

OK 

RUN 

record number ? 1 
new datapoloo 
give me data ? gio 
CONTINUE (y/n) ? y 
record number ? 1 
new data —gio 
give me data ? poi 
CONTINUE (y/n) ? n 
OK 


(y/n) R$ 
30 


L'istruzione 40 legge il record da 
aggiornare, il cui numero è intro¬ 
dotto da tastiera tramite l'istru¬ 
zione 30 

L'istruzione 50 visualizza i dati 
provenienti dal buffer 


L'istruzione 70 inserisce i nuovi 
valori nel campo del buffer 

L'istruzione 80 registra il record 
aggiornato 

Le istruzioni 90 e 100 consentono 
all'utente di continuare o di 
fermarsi 

L'istruzione 110 chiude il file. 
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TIPI DI ERRORE 

Succede raramente che un programmatore, per quanto esperto sia, scriva 
al primo tentativo un programma privo di errori. Se si escludono gli 
errori relativi all'impostazione di una linea (già descritte nel 
capitolo 1), gli errori che, in genere, possono essere fatti vengono 
classificati in due categorie: 

- errori che si manifestano durante l'esecuzione di un programma, 
(run-time errors). Essi interrompono l'esecuzione e determinano la 
visualizzazione di un messaggio di errore. 

- errori logici, che consentono l'esecuzione completa del programma, ma 
portano a risultati sbagliati o inattesi. 

11 processo di individuazione della causa dell'errore (spesso denominato 
"bug") viene conosciuto con il termine di "debugging". L'M20 fornisce 
una serie di prestazioni che riducono i costi e le difficoltà di questo 
processo. 


TIPI DI ERRORE 

COMMENTI 

Run-time errors 
(errori individuati 
dall'M20 durante 
l'esecuzione di un 
programma o di una 
linea immediata) 

possono essere errori di sintassi (quando una 
linea contiene una sequenza di caratteri non 
corretta) o altri tipi di errori di esecuzione 
(NEXT privo di FOR, RETURN privo di GOSUB, 
eco. . . ) 

E' anche possibile simulare un errore BASIC, o 
generare un errore definito dall'utente (da 
gestirsi mediante una routine di error trap). 
Vedere le istruzioni ERROR e ON ERROR GOTO 
illustrate di seguito. 

Errori di logica 
(errori, che consen¬ 
tono il completamento 
dell'esecuzione del 
programma, ma pro¬ 
ducono risultati 
errati o inattesi) 

sono gli errori più difficili da individuare, e 
sono denominati errori "logici". Per fornire un 
semplice esempio, si assuma di aver scritto un 
programma che deve stampare i risultati di 15 
calcoli. Se, a seguito dell'esecuzione del 
programma, vengono stampati solo 11 risultati, 
deve essersi verificata una qualche forma di 
errore. L’individuazione dell'errore, se il 
programma è lungo e complesso e contiene molti 
salti, cicli e sottoprogrammi, può risultare un 
compito non agevole. E’ possibile che il 
controllo non sia stato trasferito all'istruzio- 
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ne prevista o che qualche calcolo non sia stato 
effettuato. Le possibilità di errore sono 
molteplici. 

In questi casi, può risultare molto utile poter 
sapere esattamente quali istruzioni vengono 
eseguite ed il flusso della loro esecuzione 


VISUALIZZAZIONE DEI NUMERI DI LINEA ESEGUITI (TRACINE) 


Un metodo utile di debugging 
flusso di esecuzione delle 
programma. L'M20 fornisce, a 
anche essere utilizzati come 


di errori logici consiste nel tracciare il 
istruzioni per una parte o per l'intero 
questo proposito, due comandi che possono 
istruzioni nell'ambito di un programma. 


TRON/TROFF (PR0GRAMMA/1MMED1ATQ) 

TRON (TRACE ON) produce una lista dei numeri di linea di tutte le 
istruzioni eseguite. 

TROFF (TRACE OFF) arresta la lista iniziata con l'impostazione del 
comando TRON. 



Sintassi 13-1 Comando TRON 



Sintassi 13-2 Comando TROFF 
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Esempio 


VIDEO 


COMMENTI 


TRON 

Ok 

LIST 
10 K=10 

20 POR J=1 TO 2 
30 L=K+10 
40 PRINT J;K;L 
50 K=K+10 
60 NEXT 
70 END 
Ok 
RUN 

[10] [20] [30] [40] 1 10 20 
[50] [60] [30] [40] 2 20 30 
[50] [60] [70] 

Ok 

TROFF 

Ok 


TRON setta l'indicatore di traccia 
che visualizza il numero di linea 
di ogni istruzione di programma 
eseguita. 1 numeri sono racchiusi 
tra parentesi quadre. 1 numeri, 
che non sono racchiusi tra paren¬ 
tesi quadre (nell’esempio) sono il 
risultato dell’esecuzione dell'i¬ 
struzione 

40 PRINT J;K;L 

L'indicatore di traccia viene 
resettato con il comando TROFF 
oppure all'esecuzione di un coman¬ 
do NEW. 


INTERRUZIONE DELL'ESECUZIONE DI UN PROGRAMMA 

L'esecuzione di un programma viene interrotta quando: 

- si imposta EST oppure 

- viene eseguita un'istruzione STOP, oppure 

- viene emesso un messaggio di errore recuperabile. 

Nei casi sopra ricordati, 1'M20 entra in Stato Comandi, consentendo la 
visualizzazione delle variabili di programma (con l'uso delle istruzioni 
immediate PRINT e PRINT USING) o la modifica del loro valore (con l’uso 
delle istruzioni immediate LET oppure CLEAR). E' possibile riprendere 
l'esecuzione del programma impostando il comando CONT. 

Non è possibile riprenderne l'esecuzione se il programma viene modifi¬ 
cato. 
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L'istruzione END o un errore irrecuperabile consentono di entrare m 
Stato Comandi e di visualizzare le variabili, ma non consentono di 
riprendere l'esecuzione del programma. 

END (PROGRAMMA) 


Fa terminare l'esecuzione del programma, chiude tutti i file dati e 
riporta 1'M20 in Stato Comandi. 



Sintassi 13-3 Istruzione END 


Note 

Sebbene non sia necessario finire un programma con una istruzione END, 
questa istruzione è molto utile poiché chiude tutti i file dati aperti, 
inoltre aumenta la leggibilità del programma. L'istruzione END è anche 
usata per porre la fine del programma al termine di un salto (branch). 
Ad esempio: 

250 IF>Z 1000 THEN END 

L'istruzione END può essere inserita in qualsiasi parte di un programma 
per terminarne l'esecuzione. A differenza dell'istruzione STOP, 1 istru¬ 
zione END non produce la visualizzazione del messaggio BREAK. 

L'esecuzione di un'istruzione END provoca sempre un ritorno in Stato 
Comandi. L'utente può visualizzare i valori delle variabili di programma 
con l'uso dell'istruzione immediata PRINT (o PR1NT US1NG), ma non può 
riprendere l'esecuzione del programma (può, soltanto, farlo eseguire di 

nuovo). 


STOP (PROGRAMMA) 

Interrompe temporaneamente l'esecuzione del programma e riporta TrCO in 
Stato Comandi. 
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Sintassi 13-4 Istruzione STOP 


Note 

L'istruzione STOP, come l'istruzione END, può essere inserita in ogni 
parte del programma. Quando il controllo dell'esecuzione passa a questa 
istruzione, il messaggio seguente viene visualizzato: 

Break in line nnnnn 

A differenza dell'istruzione END, l’istruzione STOP non chiude i file. 

11 BASIC ritorna sempre in Stato Comandi dopo l'esecuzione dell'istru¬ 
zione STOP. L'utente può riprendere l'esecuzione del programma con 
comando CONT (vedere in seguito). 


Esempio 


VIDEO 

COMMENTI 

LIST 

l'istruzione 30 permette di controllare ed 

10 INPUT A,B,C 

osservare il primo valore di X prima che il 

20 X=A*B 

secondo venga calcolato e visualizzato. In 

30 STOP 

questo semplice caso, l'istruzione STOP non 

40 X=X/C 

sembra molto utile, ma lo è, invece, nel caso di 

50 PRINT X 

programma di grosse dimensioni. Impostando 

60 END 

un'istruzione STOP alla fine di un trasferimento 

Ok 

di controllo, il programma si arresterà solo se 

RUN 

il trasferimento viene effettuato. Permette 

? 4,3,6 

anche di modificare alcune variabili prima che 

Break in 30 

l'esecuzione continui con l'uso del comando 

Ok 

CONT. 

PRINT X 


12 

Quando il programma sarà sufficientemente veri- 

Ok 

ficato, l’utente può cancellare tutte le istru- 

CONT 

zioni STOP, inserite per il debugging e può 

2 

rinumerare il programma. 

Ok 
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CONT (IMMEDIATO) 


Permette di riprendere 
MniilBS . da una 

recuperabile. 


l'esecuzione di 
istruzione STOP, 


un 

o 


programma interrotto da un 
da un messaggio di errore 



Sintassi 13-5 Comando CONT 


Note 

L'esecuzione riprende dal punto in cui si è verificata l'interruzione. 


SE... 

ALLORA. . . 

è stato 

impostato dopo un 
pronpt di una i- 
struzicne INPUT 

l'esecuzione continua ristampando il prompt (? 
seguito da uno spazio, o la stringa prompt) 

si incontra una 
istruzione STOP 

i valori intermedi possono essere esaminati e 
modificati con l’uso delle istruzioni immediate 
(PRINT, PR1NT US1NG, LET, SWAP). 


L'esecuzione può essere ripresa impostando il 
comando CONT o l'istruzione immediata GOTO, che 
rimanda il controllo dell'esecuzione ad un 
numero di linea specificato (l'impostazione di 
RUN numero di linea invece di GOTO numero di 
linea consente di ripartire dallo stesso punto, 
ma provoca la cancellazione di tutte le varia¬ 
bili del programma). 


Ad esempio: 


10 INPUT A,B,C 

20 K=A A 2*5.3 :L=3 A 3/.26 

30 STOP 

40 M=C*K+100:PRINT M 
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RUN 

? 1 ,2,3 

Break in 30 

Ok 

PR1NT L 

30.7692 

Ok 

CONT 

115.9 

Ok 

si verifica un er- 

si può usare CONT per continuare l'esecuzione 

rore recuperabile 


il programma è 

CONT non è valido 

stato modificato 


durante l'interru- 


zione 



CONTROLLO E RECUPERO DEGLI ERRORI 

Di norma, quando il BASIC individua un errore run-time come un richiamo 
illegale di funzione, il BASIC tratta l'errore interrompendo l’esecu¬ 
zione, visualizzando un apposito messaggio e ritornando in Stato 
Comandi. 

Spesso l'utente vuole trattare l'errore in modo diverso dallo standard. 

Questo può essere fatto scrivendo una routine di trattamento dell'er¬ 
rore. 

Usando l'istruzione ON ERROR GOTO, è possibile introdurre una routine di 
gestione dell'errore. 11 controllo viene trasferito alla linea specifi¬ 
cata dopo GOTO, quando si è verificato un errore. 

L'istruzione ON ERROR GOTO deve essere inserita una sola volta in un 
programma per abilitare il trattamento non standard dell'errore. 
L'esecuzione di un ON ERROR GOTO 0 al di fuori della routine di 
trattamento dell'errore disattiva il trattamento non standard dell'er¬ 
rore . 
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L'esecuzione di un "ON ERROR GOTO 0" all'interno di una routine di 
gestione degli errori, indica che l'errore deve essere trattato in modo 
standard per qualsiasi errore che la routine non tratta. 

Nel caso si verifichi un errore run-time e il trattamento non standard 
degli errori è abilitato, il controllo dell'esecuzione viene trasferito 
alla linea specificata. E' possibile allora fare uso delle funzioni ERR 
e ERL ed eseguire la routine di recupero dell'errore. La funzione ERR 
contiene il codice dell'errore, mentre la funzione ERL il numero della 
linea in cui è stato individuato l'errore. 

La routine di gestione degli errori controlla tutti gli errori che 
l'utente desidera recuperare ed indica il modo di gestirli. Ciò, di 
solito, porta come conseguenza la correzione dell'errore, la ripresa 
dell'errore, la ripresa dell'esecuzione nel punto in cui si era 
verificato l'errore senza passare in Stato Comandi. 


ERROR (PROGRAMMA/IMMEDIATO) 


Simula il verificarsi di un errore del linguaggio BASIC, oppure genera 
un errore definito dall'utente. 


< 


ERROR 



numeric 


) * 

expression 



Sintassi 13-6 Istruzione ERROR 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

numeric expression 


il valore dell'espressione numerica rappresenta 
un codice di errore. 



Deve essere maggiore di 0 e minore di 255. Se 
non è un intero, viene arrotondato all'intero 
più vicino. 


13-8 


LINGUAGGIO BASIC - MANUALE GENERALE 



DEBUGGING E RECUPERO DEGLI ERRORI 


Caratteristiche 











ON ERROR GOTO (PROGRAMMA) 


Permette la gestione degli errori e specifica la prima linea della 
routine di gestione degli errori (ogni programma BASIC può avere solo 
una routine di gestione dell'errore). 



Sintassi 13-7 Istruzione ON ERROR GOTO 

Dove 
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Esempio 


VIDEO 


COMMENTI 


Se si introduce un 
valore di B maggiore 
di 5000, viene visua¬ 


li 0 ON ERROR GOTO 400 <dL- 
120 INPUT "WHAT 1S YOUR BET";B 
130 1F B > 5000 THEN ERROR 210 


lizzato il messaggio: 
HOUSE LIM1T 1S $5000 


400 IF ERR=210 THEN PR1NT "HOUSE L1M1T 1S $5000" 
410 1F ERL=130 THEN RÉSUMÉ 120 
420 ON ERROR GOTO 0 


e l'esecuzione ripren¬ 
de alla linea 120. Se 
si incontrano altri 
errori, l'istruzione 
420 fa si che sia 
visualizzato il mes¬ 
saggio standard di 
errore. 


Caratteristiche 

SE. .. 

ALLORA... 

E' stata abilitata 
la gestione non 
standard degli errori 

tutti gli errori individuati (inclusi gli errori 
verificatisi nelle linee ad esecuzione immedia¬ 
ta) determineranno un trasferimento alla routine 
di gestione dell’errore 

il numero di linea 
dopo ON ERROR GOTO 
non esiste 

viene visualizzato il messaggio: 

Undefined line 

viene eseguita l'i 
struzione ON ERROR 

GOTO 0 

la gestione degli errori viene disabilitata. 
Errori successivi visualizzeranno un messaggio 
standard di errore ed interromperanno l'ese¬ 
cuzione. 

l'istruzione ON ERROR 
GOTO 0 inserita nella 
routine di gestione 
degli errori 

il programma BASIC si arresta e viene visualiz¬ 
zato il messaggio standard di errore per 
rerrce che ha causato l'attivazione della 
routine. 


13-11 



si verifica un er¬ 
rore durante l'ese¬ 
cuzione di una rou¬ 
tine di gestione 
degli errori 


Nota: Si raccomanda che tutte le routine di 
gestione degli errori eseguano un ON ERROR GOTO 
0 nel caso in cui si verifichi un errore di cui 
non è previsto il recupero. 

il programma BASIC evidenzia un messaggio di 
errore e l'esecuzione termina. Non è possibile 
trasferire il controllo alla routine di gestione 
degli errori quando un errore si verifica 
nell'ambito della stessa routine. 


ERL/ERR 

Quando si verifica un errore, la funzione ERL fa ritornare il numero di 
linea nella quale l'errore è stato individuato, mentre la funzione ERR 
fa ritornare il codice di errore. 



Sintassi 13-8 Funzione ERL 
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Caratteristiche 

Le funzioni ERL e ERR vengono generalmente, utilizzate nelle istruzioni 
IF...THEN...ELSE oppure IF...GOTO... ELSE per trasferire il controllo 
d'esecuzione alla routine di gestione degli errori. 


SE. .. 


ALLORA. .. 

l'istruzione che 
ha causato l'er- 


ERL conterrà il valore 65535. 

rore è stata una 
istruzione immediata 


Per verificare se si è verificato un errore in 
una istruzione immediata si usi: 

IF 65535=ERL THEN... 

Altrimenti, si usi: 

IF ERR = error code THEN... 

IF ERL = line number THEN... 

il numero di linea 
non è sul lato de¬ 
stro dell'operatore 
di confronto 


non può essere attribuito un nuovo numero di 
linea mediante la funzione RENUM 


Esempio 


VIDEO 


COMMENTI 

LIST 


SE si imposta un vaio- 

10 REM RETTANG0L02 


re negativo per B 

20 ON ERROR GOTO 70 


oppure per H, la rou- 

30 INPUT "Base e Altezza";3,H 


tine di gestione del- 

40 IF (B< 0) OR (H < 0) THEN ERROR 200 


l'errore viene attiva- 

50 PRINT "Area=";"B*H;" 8=";8;" H=";H 


ta ed il sistema vi- 

60 GOTO 30 


sualizza : 

70 IF (ERR=200) AND (ERL =40) 



THEN PRINT "B o H<0":RESUME 30 


B o H < 0 

80 ON ERROR GOTO 0 



90 END 


L'esecuzione viene ri- 

Ok 


presa all'istruzione 

RUN 


30 (vedere l'istruzio- 

Base e Altezza? -2,5 
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ne RÉSUMÉ qui di se¬ 
guito) . 

Si noti l'uso di ERR e 
di ERL nella routine 
di gestione degli er¬ 
rori 


Note 

Queste funzioni possono essere usate anche come normali funzioni BASIC. 
Per esempio: 

PR1NT ERR 

PRINT "Troppo grande", ERL 
1% = ERR 

RÉSUMÉ (PROGRAMMA) 

Riprende l'esecuzione dopo che si è entrati nella routine di gestione 
degli errori. 



Sintassi 13-10 Istruzione RÉSUMÉ 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

0 


l'esecuzione riprende all'istruzione che ha 
causato l'errore. 

Nota: RÉSUMÉ 0 e RÉSUMÉ sono equivalenti 

NEXT 


l'esecuzione riprende alla prima istruzione 
successiva a quella che ha causato l'errore 

line number 


l'esecuzione riprende al numero di linea speci¬ 
ficato 


Note 

Un'istruzione RÉSUMÉ che non è inclusa nella routine di gestione degli 
errori fa visualizzare il messaggio "RÉSUMÉ without error". 


Esempi 


VIDEO 

COMMENTI 

LIST 


10 REM RETTANG0L03 

se si introduce un 

20 ON ERROR GOTO 70 

valore negativo per B 

30 INPUT "Base e Altezza";B,H 

oppure H, la routine 

40 1F (B<0) OR (H < 0 ) THEN ERROR 200 

di gestione degli er- 

50 PR1NT "Area=";B*H;"B=";B;" H=";H 

rori viene attivata. 

60 GOTO 30 

In questo caso la 

70 1F (ERR=200) AND (ERL=40) THEN RÉSUMÉ 

80 ON ERROR GOTO 0 

90 END 

routine determina la 
ripresa dell'esecu- 

Ok 

pjjn 

zione all'istruzione 

che ha causato l'er- 

Base e Altezza? -2,5 

rore, causando in 

A C 

questo modo un ciclo 

Ok 

senza fine. 

Per fermare l'esecu- 
7-inne adire su 

gii 
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70 IF (ERR=200) AND (ERL=40) THEN RÉSUMÉ NEXT 

RUN 

Base e Altezza? -2,5 

Area=-10 B=-2 H= 5 
base e Altezza A C 

Break in 30 

Ok 

l'errore viene ignora¬ 
to, correggendo così 
la linea 70 

70 1F (ERR=200) AND (ERL=40) THEN RÉSUMÉ 30 

correggendo così la 

RUN 

linea 70 la routine di 

Base e Altezza? -2,5 

gestione degli errori 

Base e Altezza? 2,5 

fa sì che l’esecuzione 

Area= 10 B= 2 H= 5 

sia ripresa alla linea 

Base e Altezza? A C 

30 

Break in 30 


Ok 
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SOMMARIO 


Questo capitolo intende far conoscere all'utente le prestazioni grafiche, 
disponibili sull'M20 e le loro modalità d'uso. 

In un "computer" la grafica è il mezzo con il quale l’informazione viene 
rappresentata sotto forma di figura; una qualunque combinazione di testi 
e di figure è "grafica". 

11 capitolo è suddiviso nei seguenti paragrafi. 
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GRAFICA 


INTRODUZIONE 

L'M20 è disponibile in due versioni: con video in bianco e nero e con' 
video a colori. In entrambi i casi, l'utente può visualizzare una matrice 1 
di 512 x 256 "pixel" oppure 480 x 256 "pixel", dove il termine "pixel è; 
l'abbreviazione di "picture element" (elemento di figura). Un elemento di; 
figura è un punto luminoso di video e una riga di punti luminosi co-- 
stituisce una "scanline" (le- dimensioni massime dell'immagine su video 
sono: 225 mm in orizzontale e 140 mm in verticale). 


64 colonne x 16 linee 80 colonne x 25 linee 




Figura 14-1 Modalità di visualizzazione (512 x 256 oppure 480 x 256) 

Le linee di testo, che compaiono sul video possono contenere un numero 
massimo di 64 o 80 caratteri. 

Anche lo spazio tra una linea di testo e la successiva può variare; sul 
video può esserci da un minimo di 16 linee fino ad un massimo di 25. 

Nella versione a colori dell'M2Q, i caratteri e la grafica possono essere 
visualizzati usando quattro colori diversi contemporanei, scelti tra 8 
possibili. 

Gli otto colori possibili sono: nero, rosso, verde, giallo, blu, magenta, 
cyan e bianco. , 
Nella versione a colori, il colore di fondo del video (colore di backgr¬ 
ound) è nero e il colore con cui l'utente visualizza i caratteri e la 
grafica (colore di foreground) è verde. 

Nella versione in bianco e nero, invece, il colore di background è nero 
ed il colore di foreground è bianco. 

In entrambe le versioni dell'M20, è possibile variare questi due colori, 
con l'uso dell'istruzione COLOR. Ovviamente per il video in bianco e nero 
è solo possibile scambiare i due colori. 

Il video può essere pensato come un sottile foglio di carta, sul quale 
poter far scorrere una ipotetica penna chiamata penna virtuale ("virtual 
pen"). Questa penna può essere spostata dall'utente in qualsiasi posizio¬ 
ne del video e nel far questo può disegnare ("pen down") oppure no ("pen 
up"). 
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FINESTRE 


In entrambe le versioni dell'M20, il video può essere suddiviso dall’u¬ 
tente in aree rettangolari, chiamate finestre ("windows"). 11 numero mas¬ 
simo, compreso tra 1 e 16, può essere impostato con il comando PCOS 
sbasic (per ulteriori dettagli vedere "Professional Computer Operating 
System (PCOS) Guida Utente"). 

Le dimensioni delle finestre vengono stabilite con la funzione W1ND0W, 
descritta in seguito nel capitolo. 

Su una finestra, l'utente può operare esattamente come sull'intero video; 
su essa può eseguire operazioni di grafica, di testo, oppure di entrambe. 

Le operazioni eseguite su finestre diverse sono completamente indipenden¬ 
ti . 

Supponiamo di eseguire operazioni di grafica; in questo caso, l'utente 
può operare, definendo un proprio sistema di coordinate ( coordinate 
utente"), il più adatto al problema da trattare (vedere l'istruzione 
SCALE) oppure usare quello standard ("coordinate hardware"). 

Nel sistema di coordinate standard, l'origine è posta nell'angolo 
inferiore sinistro della finestra, il semiasse positivo delle x va 
dall'origine verso destra; il semiasse positivo delle y va dall'origine 
verso l'alto e le coordinate di ogni punto sono espresse in "pixel". 

Si noti che i semiassi non vengono tracciati; se l'utente desidera fare 
ciò, deve usare l'istruzione LINE (descritta in seguito) 

Supponiamo di eseguire operazioni su linee di testo. In questo caso 
l'origine (ovvero la posizione, in cui verrà visualizzato il primo 
carattere impostato) coincide con l'angolo superiore sinistro della 
finestra. E' possibile, però, iniziare a visualizzare un carattere da 
qualunque altra posizione sul video con l'uso dell'istruzione CURSOR 
(descritta in seguito). Le coordinate di ogni carattere di testo vengono, 
sempre, espresse in termine di numero di riga e di numero di colonna. 

Le coordinate grafiche sono completamente indipendenti dalle coordinate 
di testo. 

Ogni finestra in cui il video è stato suddiviso, ha due cursori: il 
cursore di testo e il cursore grafico. Entrambi ì cursori possono essere 
posizionati dall'utente in qualunque posizione del video con l’uso 
dell'istruzione CURSOR. 

Si osservi, però, che il cursore di testo si sposta automaticamente di 
una posizione ogni volta che un carattere viene impostato; questo non è 
vero per il cursore grafico; quando viene eseguita un'istruzione di 
grafica non è il cursore grafico a spostarsi, ma la penna virtuale. 
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APERTURA 01 FINESTRE 


Quando l'utente entra in ambiente BASIC, è presente una sola finestra 
(l'intero video) e il sistema di coordinate è quello standard. Aprire una 
finestra significa suddividere una qualsiasi finestra già esistente. 

Per fare ciò, l'utente deve usare la funzione WINDOW. 


W1ND0W - PER APRIRE UNA FINESTRA 

Apre una nuova finestra, suddividendo la finestra attuale ("current 
window"). Per finestra attuale si deve intendere la finestra sulla quale 
l'utente si trova ad operare. 



Sintassi 14-1 Funzione WINDOW 

Dove 


ELEMENTO DI SINTASSI 

, SIGNIFICATO 

window number variable 

è una variabile intera, alla quale il sistema 
operativo assegna un valore, che identifica la 
finestra da aprire. 

Questo valore è un intero da 2 a 16. 1 valori 
vengono assegnati dal sistema in ordine crescen¬ 
te. 

La finestra che inizialmente coincide con 
l'intero video viene identificata con il numero 
1, la prima che viene aperta dall'utente con il 
numero 2 ecc. 

Supponiamo, ad esempio, chae l'utente stia 
operando sulla finestra, identificata dal numero 
quattro e decida di aprirne un'altra, a questa 
nuova finestra il sistema assegnerà il numero 5. 
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quadrant 


position 


La finestra numero 4 viene allora chiamata la 
finestra "genitrice" ("parent window"), dal 
momento che una sua suddivisione ha dato luogo 
alla numero 5. 

Nota : 11 sistema considera l'intero video come 
la finestra principale e, pertanto, gli assegna 
il numero 1, che la identifica, sempre, anche se 
in seguito viene suddivisa in altre finestre. 


specifica dove, all'interno della finestra 
"genitrice", la nuova finestra deve essere 
aperta. 

L'utente dispone di quattro possibilità: 

0 nella parte alta della finestra "genitrice" 

1 nella parte bassa 

2 nella parte sinistra 

3 nella parte destra 


individua la posizione, in corrispondenza della 
quale la finestra "genitrice" viene suddivisa 
per dar luogo ad una nuova finestra 

Se il valore del parametro 'quadrant' è 0 oppure 
1, la suddivisione è orizzontale. In questo 
caso, il parametro 'position' è un numero intero 
di "scanline" compreso nell'intervallo, i cui 
estremi sono: 


limite inferiore = valore, che in 

spazio tra due 
contigue di testo +1 


indica lo 
due linee 


limite superiore = valore, che indica l'altezza 

della finestra genitrice 
diminuito del limite 
inferiore più uno. 


Nota: lo spazio fra due linee contigue di testo 
viene, sempre, espresso in termine di scanline. 
La posizione della linea di suddivisione (che 
non viene visualizzata) è, sempre, calcolata a 
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vertical spacing 


horizontal spacing 


partire dall'alto della finestra genitrice. 

Se "quadrant" vale 2 oppure 3, la suddivisione è 
verticale. In questo caso, il parametro "posi- 
tion" è un numero intero di caratteri, compreso 
nell'intervallo, i cui estremi sono: 

limite inferiore = 1 

limite superiore = larghezza della finestra ge¬ 
nitrice, diminuita di una 

unità. 

Se il parametro 'horizontal spacing' della 
finestra genitrice vale 6 (cioè 80 caratteri su 
un' intera linea di video) allora, nell'in¬ 
tervallo sopra descritto, il parametro position 
può assumere solo i valori multipli di 4 con 
l'aggiunta di una unità (ad es. 5,9,13, ecc.). 

Se 'quadrant' vale 2, la linea di suddivisione 
(che non viene visualizzata) è calcolata a 

partire dal bordo sinistro della finestra 
genitrice. 

Se 'quadrant' vale 3, la linea di suddivisione 
(che non viene visualizzata) è, invece, calcola¬ 
ta a partire dal bordo destro della finestra 
genitrice. 


è un parametro opzionale, che stabilisce lo 
spazio, che deve essere presente fra due linee 
contigue di testo (per la finestra da aprire). 
Viene espresso in termine di "scanline". Ha, 
come valore minimo, 10 (sull'intero video 
vengono visualizzate 25 linee di testo) e come 
valore massimo 16 (16 linee di testo). 

Per default, vertical spacing assume il valore 
del parametro omonimo della finestra genitrice. 


parametro opzionale, che stabilisce lo spazio, 
che deve essere presente fra due caratteri 
contigui in una linea di testo (per la finestra 
da aprire). Viene espresso in termini di numero 
di 'pixel' e può assumere due valori : 6 oppure 
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11 primo di questi due valori consente un 
massimo di 80 caratteri per una linea completa 
di testo (sull'intero video), il secondo 64. 

Per default, horizontal spacing assume il valore 
del parametro omonimo della finestra genitrice. 


Nota: Ogni precedente contenuto dell'area rettangolare di video, che va a 
costituire la nuova finestra, viene cancellato e, come colori di 
background e di foreground, vengono assunti quelli della finestra 
genitrice. 

Si è visto come l'utente possa specificare, al momento dell'apertura di 
una finestra, sia lo spazio verticale fra linee contigue di testo, sia lo 
spazio orizzontale fra caratteri contigui su una stessa linea. 

In alcuni casi, può risultare necessario variare questi due valori 
relativamente ad una finestra, che è già stata aperta. Questo può essere 
fatto con l'uso della funzione W1ND0W, ponendo a zero i parametri 
quadrant e position. 


W1ND0W - PER VARIARE LO SPAZIO TRA LINEE E CARATTERI 

Con questa funzione non viene aperta alcuna nuova finestra. Viene usata, 
semplicemente, per variare lo spazio fra caratteri e/o lo spazio fra 
linee di testo della finestra attuale. 



Sintassi 14-2 Funzione W1ND0W - per variare lo spazio tra linee e 
caratteri 
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Oove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number variable 

è una variabile intera, alla quale il sistema 
assegna il numero della finestra attuale. 

0 

valore del parametro quadrant 

0 

valore del parametro position 

vertical spacing 

è un parametro opzionale, che stabilisce lo 
spazio fra due linee contigue di testo. 

Viene espresso in termini di ’scanline'. 

Ha come valore minimo 10 (sull'intero video 
vengono visualizzate 25 linee di testo) e come 
valore massimo 16 (16 linee di testo). Se 

omesso, lo spazio tra linee rimane immutato 

horizontal spacing 

è un parametro opzionale, che stabilisce lo 
spazio fra due caratteri contigui in una linea 
di testo. 

Viene espresso in termine di 'pixel' e può 
assumere due valori: 6 oppure 8. Il primo di 
questi due valori consente un massimo di 80 
caratteri per una linea completa di testo; il 
secondo 64. 

Se omesso, lo spazio fra caratteri rimane 
immutato. 


Al momento dell'accensione dell’M20, è presente una sola finestra, che 
coincide con l'intero video e che ha numero 1. 11 parametro horizontal 
spacing ha valore 8 ed il parametro vertical spacing ha valore 16, così 
sull'intero video può essere visualizzato un numero massimo di 16 linee 
di testo, con 64 caratteri per linea. 

L'utente può variare questa modalità di visualizzazione ed avere 25 linee 
di testo con 80 caratteri ciascuna. 

Per far questo, immediatamente dopo essere entrato in ambiente BASIC, 
deve usare la funzione W1ND0W - per variare lo spazio tra linee e 
caratteri e porre il parametro horizontal spacing uguale a 6 ed il 
parametro vertical spacing uguale a 10. 


14-7 














Esempi 


SE l'utente imposta... 


ALLORA 


A=W1ND0W (0,100) 


CR 


la suddivisione è orizzontale, la nuova 
finestra viene ad essere la parte alta della 
finestra genitrice. 


L'altezza della finestra da aprire è 100 
scanline. 1 parametri horizontal spacing e 
vertical spacing assumono i valori di de¬ 
fault. (quelli della finestra genitrice) 


A=W1NDOW(0,100,14) 


come sopra, con l'unica eccezione che lo 
spazio fra due linee contigue di testo è 
stabilito in 14 scanline. 


B«W1NDOW(2,50) 


la suddivisione è verticale, la nuova finestra 
viene ad essere la parte sinistra della 
finestra genitrice. La larghezza della fine¬ 
stra da aprire è 50 posizioni di carattere. 

1 parametri horizontal spacing e vertical 
spacing assumono i valori di default. 


A=W1NDOW(0,100) 
PR1NT A 


è sempre possibile conoscere il numero intero 
con il quale il sistema operativo identifica 
una finestra. 


La funzione W1ND0W apre una finestra, che 
l'utente identifica con la variabile A. 11 
sistema operativo assegna un valore intero a 
questa variabile. 

11 contenuto di A viene, poi, visualizzato con 
l'uso dell'istruzione PR1NT A. 


A=3:D=40:F=15 :G=8 
W=WIND0W(A,D,F,G) 


Bsa 


CR 


la suddivisione è verticale. La nuova finestra 
è la parte destra della finestra 'genitrice'. 
La lunghezza della finestra da aprire è 50 
posizioni di carattere. 

11 parametro vertical spacing vale 15 scanline 
ed ogni linea completa di testo può contenere 
64 caratteri. 
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W2=W1ND0W(1,205,16) 
W3=W1ND0W(0,40,16) 
W4=W1ND0W(2,20,16) 
W5=W1ND0W(3,25,16) 


[CR 

CR* 

cIT 

cr" 


queste funzioni W1ND0W suddividono il video in 
5 finestre. Nelle figure qui di seguito 
riportate viene mostrata la sequenza di questa 
suddivisione 


r 



1 


1 

2 


0 





■mi 





3 

! 


D 

i 



2 





j 




Figura 14-2 Sequenza con la quale vengono aperte le finestre 


USO DELLE FINESTRE 


Con l'uso delle finestre', l'utente può visualizzare più di un testo 
(ciascuno con un diverso spazio fra linee e con una diversa densità di 
caratteri per linea) e/o più di un diagramma (con differenti colori di 
backround e foreground). Si noti che, in qualsiasi momento, il contenuto 
dell'intero video o di una sua parte ("la finestra") può essere 
cancellato, usando l'istruzione CL5 (vedere in seguito nel capitolo). 

E' anche possibile per ogni finestra definire un diverso sistema di 
coordinate, con l'istruzione SCALE. 
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Con l'istruzione W1ND0W, l'utente seleziona la finestra su cui operare. 

U1ND0W (PROGRAMMA/IMMEDIATO) 

Seleziona la finestra, su cui operare. La finestra selezionata diviene la 
finestra attuale. 



WINDOW 


> 


<DH 


window 

number 

expression 


Sintassi 14-3 Istruzione WINDOW 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è una espressione numerica, il cui valore, 
arrotondato all'intero più vicino, identifica 
una finestra già aperta in precedenza e la 
seleziona. 

11 parametro window number expression può 
assumere solo valori interi da 1 a 16 e deve 
corrispondere ad una finestra esistente, altri¬ 
menti si ha una segnalazione d'errore. 


Esempi 


SE 


1'utente 


imposta... 


ALLORA. .. 


WINDOW %A B3 


il sistema seleziona la finestra identificata 
dal valore intero, contenuto nella variabile A. 
Se questo valore è noto (ad es.2), l'istruzione 
WINDOW può essere impostata anche nel modo 
seguente : 
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W1ND0W %1 


CR 


U1NDOW %2 


CR 


il sistema seleziona la 
dal numero 1. Come noto 
principale 


finestra, identificata 
, questa è la finestra 


Note 

Nella versione a colori dell'M20, l'utente ha la possibilità di operare 
contemporaneamente su video con quattro colori diversi, scelti in una 
gamma di otto. Per fare ciò, deve essere usata l'istruzione COLOR - PER 
LA SCELTA DEI COLORI CONTEMPORANEI. 


COLOR - PER LA SCELTA DEI COLORI CONTEMPORANEI (PROGRAMMA/1MMED1ATO) 

Seleziona i quattro colori contemporanei tra gli otto possibili. 


-«{color} 


colour 

code 


colour 

code 


o- 


colour 

code 


colour 

code 


Sintassi 14-4 Istruzione COLOR - per la scelta dei colori contemporanei 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

colour code 

è una espressione numerica, che assume un valore 
intero da 0 a 7. A ciascuno di questi valori 
corrisponde un colore. 


Codici di Colore 

La tabella, riportata qui di seguito, elenca i colori dell'M20 e i 
corrispondenti codici di colore ("colour codes"). 
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CODICE DI COLORE 


COLORE 

0 


nero 

1 


verde 

2 


rosso 

3 


giallo 

4 


blu 

5 


cyan 

6 


magenta 

7 


bianco 


Numeri di colore 

In molte istruzioni di grafica, si parlerà di "numero di colore". 

11 "numero di colore" è un intero da 0 a 3 e rappresenta la posizione che 
è stata assegnata dall'utente ad un colore nell'istruzione COLOR - per la 
scelta dei colori contemporanei. Se quest'ultima istruzione non viene 
eseguita, il sistema assume, per default, i colori: nero, verde, rosso e 
blu e assegna loro i numeri di colore 0, 1 2 e 3 rispettivamente. 

Se l'istruzione COLOR per la scelta dei colori contemporanei descritta in 
precedenza, viene eseguita sulla versione in bianco e nero dell H20, 
l'utente non noterà alcun effetto. 

In questo caso, il sistema ha a disposizione solo due colori: nero e 
bianco e assegna loro i numeri di colore 0 e 1 rispettivamente. 

Ogni finestra ha un colore di background e un colore di foreground di 
default. Sia nella versione a colori che nella versione in bianco e nero 
i numeri di colore sono 0 per il colore di background (di default) e 1 
per il colore di foreground (di default). 

L'utente può variare i colori di background e di foreground con l'uso 
della seguente istruzione COLOR. 


COLOR (PROGRAMMA/IMMEDIATO) 

Seleziona i colori di background e di foreground per una finestra 
specificata. 
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Sintassi 14-5 Istruzione COLOR 


Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è una espressione numerica intera, il cui valore 
seleziona la finestra, su cui operare. E' 
opzionale. Se omesso, il sistema opera sulla 
finestra attuale. 

foreground colour 

è un numero di colore, che individua e seleziona 
il colore di foreground 

background colour 

è un numero di colore, che individua e seleziona 
il colore di background. 

Se omesso, il precedente colore di background 
rimane immutato. 


Note 

I colori di background e di foreground di una finestra variano con l'uso 
dell'istruzione COLOR. 

Questa variazione non è di immediata visualizzazione e l'utente per 
rendersene conto, dopo l'esecuzione dell'istruzione COLOR, deve effettu¬ 
are una delle seguenti operazioni. 

1. Eseguire l'istruzione CLS (descritta in seguito, nel capitolo); in 
questo modo la finestra selezionata assume il nuovo colore di 
background. 

2. Eseguire l'istruzione PRESET (descritta, in seguito, nel capitolo); 
con l'uso ripetuto di questa istruzione, parti della finestra sele¬ 
zionata assumono il nuovo colore di background. 


14-1 3 







3. Impostare un testo; la parte del video, nella quale il testo viene 
visualizzato assume i nuovi colori di background e di foreground. 


Esempi 

(per un sistema in bianco e nero). 


SE l'utente imposta... 


COLOR 0,1 


CR 


COLOR %A,0,1 


CRi 


ALLORA... 

la finestra attuale ha il bianco come colore 
di background e il nero come colore di 
foreground 


come sopra, ma l'istruzione COLOR opera sull-a 
finestra, identificata dalla variabile A. 


CLS (PROGRAMMA/IMMEDIATO) 

Cancella il contenuto di una finestra e la colora con il colore di 
background. 


^cl"s> L(%)- 


window 

number 

expression 


Sintassi 14-6 Istruzione CLS 
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ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è una espressione numerica intera, il cui valore 
identifica la finestra, su cui operare. L'uso di 
questo parametro è opzionale. 

Se non viene specificato, l'operazione viene 
eseguita sulla finestra attuale. 
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SCALE (PR0GRAMMA/1MMEDIAT0) 

Definisce la trasformazione tra il sistema di coordinate scelto dall'u¬ 
tente ("user coordinate") e il sistema di coordinate standard ("hardware 
coordinate” ). 



Sintassi 14-7 Istruzione SCALE 
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ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è una espressione numerica intera il cui valore 
identifica la finestra su cui operare. Se 
omesso, il sistema opera sulla finestra attuale. 

x0,x1,y0,y1 

dimensioni della finestra: 

x0: ascissa del lato sinistro della finestra, 
(cioè x minimo) 

xl: ascissa del lato destro della finestra (cioè 
x massimo) 

y0: ordinata del lato inferiore della finestra 
(cioè y minimo) 

yl; ordinata del lato inferiore della finestra 
(cioè y massimo) 


Nota: x1-x0, y1-y0 possono essere sia positive che negative, ma non 

devono mai essere uguali. 
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Se un'istruzione SCALE non viene eseguita, il sistema di coordinate è 
quello standard, che è equivalente ad eseguire l'istruzione: 

SCALE 0,511,0,255 per una modalità di visualizzazione 64 x 16 

oppure 

SCALE 0,479,0,255 per una modalità di visualizzazione 80 x 25 


Esempi 


SE l'utente imposta... 

ALLORA... 

L1NE(0,0) — (500,250) 

l'istruzione LINE (descritta in segui¬ 
to) traccia una linea dal punto di 
coordinate (0,0) al punto di coordina¬ 
te (500,250). 


La linea è indicata nella figura 14-3 
"Istruzione LINE". 


Questa linea è stata tracciata usando 
il sistema di coordinate standard, dal 
momento che nessuna istruzione SCALE è 
stata eseguita, in precedenza. 

SCALE-1000,1000,-1000,1000 

LINE (0,0) — (500,250) I£S 

Con l'uso dell'istruzione SCALE viene 
assunto un nuovo sistema di coordina¬ 
te . 

L'esecuzione della medesima istruzione 
LINE questa volta traccia una linea 
diversa. 

(vedere la figura 14-4 "Istruzione 
SCALE e LINE") 


14-16 


LINGUAGGIO BASIC 


MANUALE GENERALE 










L'utente si ricordi che se, con l'uso dell'istruzione SCALE, definisce un 
proprio sistema di coordinate, quest'ultimo rimane fin quando non esegue 
una nuova istruzione SCALE oppure esce dall'ambiente BASIC. 

Può risultare utile conoscere le coordinate standard (in pixel) di un 
punto, per questo si usano le funzioni SCALEX e SCALEY. 


SCALEX 

Trasforma una coordinata utente nella corrispondente coordinata standard, 
sull'asse delle x. 



Sintassi 14-8 Funzione SCALEX 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

coordinate 


è un coordinata utente sull'asse delle x 


SCALEY 

Trasforma una coordinata utente nella corrispondente coordinata standard 
sull'asse delle y. 



Sintassi 14-9 Funzione SCALEY 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

coordinate 


è una coordinata utente sull'asse delle y. 


CHIUSURA DI FINESTRE 


E' possibile, in ogni momento, chiudere una qualsiasi delle finestre 
aperte. E* anche possibile riportare il sistema allo "stato iniziale", in 
cui è presente una sola finestra: l'intero video. Per fare questo, 
l'utente deve operare con l'istruzione CLOSE WINDOW. 


CLOSE W1ND0W (PROGRAMMA/IMMEDIATO) 

Chiude una finestra specificata o tutte le finestre aperte. 


—C 


CLOSE WINDOW 


> 




f 

r8H 

window 

number 

expression 

L 

m 



Sintassi 14-10 Istruzione CLOSE WINDOW 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è una espressione numerica intera, il cui valore 
identifica la finestra da chiudere. 

Se window number expression viene omesso il 
sistema ritorna allo "stato iniziale", (una sola 
finestra: l'intero video). 
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L'istruzione CLOSE WINDOW, se eseguita con il parametro window number 
expression, chiude la finestra identificata dal parametro. 

11 sistema assegna l'area della finestra, che viene chiusa, al rettango¬ 
lo, che era stato suddiviso al momento della sua apertura. Quest'area 
viene ad avere il colore di background della finestra a cui viene 
assegnata. 

Nota: L'istruzione CLOSE WINDOW, se fatta operare sulla finestra 
principale, non produce alcun effetto. La finestra numero 1 (o finestra 
principale) non può mai essere chiusa. 


VISUALIZZAZIONE DEI CURSORI 


Ogni finestra ha due posizioni di cursore: una di testo e una grafica. 

11 cursore di testo individua la posizione, dove verrà visualizzato il 
successivo carattere impostato. 

La posizione del cursore di testo viene espressa in termini di numero di 
riga e numero di colonna. 

11 cursore di testo può essere visualizzato e fatto lampeggiare ad una 
determinata frequenza. 

L'utente ha a disposizione la funzione POS (descritta in seguito) per 
conoscere la posizione del cursore di testo. 

Il cursore grafico può essere visualizzato in ogni posizione desiderata. 
Si noti però che la posizione di questo cursore non varia quando si 
eseguono le istruzioni della grafica. 

Con l'uso dell’istruzione CURSOR (descritta in seguito), l'utente può 
visualizzare o no uno dei cursori, può variarne la forma e stabilirne la 
frequenza di lampeggio. 

La forma standard del cursore grafico è un rettangolo di 2 pixel per 2 
pixel. 

Il cursore di testo ha, invece, come forma standard un rettangolo di 8 
pixel (base) per 12 pixel (altezza). La visualizzazione di uno dei 
cursori è possibile solo nella finestra, su cui si sta operando; appena 
l’utente seleziona un'altra finestra, il cursore visualizzato nella 
finestra precedente scompare, ma viene memorizzato e ogni volta che 
l'utente ritorna ad operare su quella finestra il cursore riappare con le 
stesse caratteristiche. 

Si noti che quando il cursore di testo viene abilitato, il cursore 
grafico viene automaticamente disabilitato e viceversa; i due cursori non 
possono essere visualizzati contemporaneamente. 
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CURSOR (PROGRAMMA/1MMED1ATO) 

Vi sono due formati sintattici diversi per questa istruzione: CURSOR e 
CURSOR POINT. Specificano, rispettivamente, la posizione e le caratteri¬ 
stiche del cursore di testo e del cursore grafico. 



Sintassi 14-11 Istruzione CURSOR 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

POINT 


è una parola chiave opzionale. Viene usata se si 
vuole operare sul cursore grafico. Se viene 
omessa, le operazioni vengono eseguite sul 
cursore di testo 

x.y 


specificano dove il cursore deve essere posizio¬ 
nato; se si opera sul cursore di testo x e y 
rappresentano rispettivamente la posizione di 
riga e di colonna. Se, invece, si opera sul 
cursore grafico, x e y rappresentano le coordi¬ 
nate di un punto sul video. 

on-off 


stabilisce se visualizzare o no il cursore: 

0= non visualizzare 

1= visualizzare 

rate 


stabilisce se il cursore deve lampeggiare e in 
caso affermativo la frequenza di lampeggio: 
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0= non lampeggia 


1-20= frequenza di lampeggi 

shape 

è un parametro opzionale. Permette di variare la 
forma del cursore. 

E' una matrice intera unidimensionale a sei 
elementi, definita dall'utente. 


Le componenti di questa matrice danno la bit-map 
del cursore che, sia per il cursore di testo che 
per il cursore grafico, è un rettangolo di 8 
pixel (base) per 12 pixel (altezza). Ogni pixel 
rappresenta un bit (che ha valore 0 o 1). Nel 
primo caso (valore 0), il pixel viene visualiz¬ 
zato nel colore di background; nel secondo caso 
(valore 1), nel colore di foreground. 


Esempi 


SE l'utente imposta... 

ALLORA... 

CURSOR POINT(80,30) E3 

il cursore grafico viene posiziona¬ 
to nel punto di coordinate (80,30) 

CURSOR POINT(50,50)1 K3S 

il cursore grafico viene posiziona¬ 
to nel punto di coordinate (50,50) 
e viene visualizzato 

CURSOR POINT(50,50)1,1 E£S 

il cursore grafico viene posiziona¬ 
to nel punto di coordinate (50,50), 
viene visualizzato e ha una fre¬ 
quenza di lampeggio pari ad uno. 

CURSOR (32,8)1 E3 

A$=INPUT $$(1) 123 

il cursore di testo viene posizio¬ 
nato alla colonna 32 della riga 8; 
viene visualizzato e non lampeggia. 

L'istruzione A$=1NPUT A$(1) è stata 
impostata affinchè il cursore di 
testo rimanga nella posizione spe¬ 
cificata fino a quando l'utente non 
imposta un carattere da tastiera. 
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CURSOR (32,8)1,M%0) 


CR 


come sopra, con l'unica differenza 
che la forma del cursore è stata 
definita dall'utente (una freccia 
rivolta verso l'alto) 



8 pixel 


DECIMALE 

ESADEC1MALE 


00010000 ^ 
00111000 i 

A%(1 ) = 

4152 

&H1038 


01111100 ì 

11111110 J 

A%(2)= 

31998 

&H7CFE 


00111000 | 
00111000 ( 

A%(3)= 

14392 

&H3838 

12 pixel 

00111000 . 
00111000 J 

A%(4)= 

14392 

&H3838 


00111000 ] 
00111000 j 

A%(5)= 

14392 

&H3838 


00111000 
00111000 ; 

A%(6)= 

14392 

&H3838 


Figura 14-5 La Bit Map del Cursore 


Nota : Si ricordi che ogni elemento della matrice intera è una 
rappresentazione a sedici bit. 


POS 


Dà la posizione del cursore di testo nella finestra attuale. 



Sintassi 14-12 Istruzione POS 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

variable 


è una variabile numerica, alla quale il sistema 
assegna un valore intero. Questo valore fornisce 
o la posizione di riga o la posizione di colonna 
del cursore di testo (vedere il parametro 
coordinate attribuite qui di seguito) 

coordinate attribuite 


specifica se in variabile deve ritornare il 
valore relativo alla posizione di riga o alla 
posizione di colonna. 

0 = posizione di colonna 

0 = posizione di riga. 


VISUALIZZAZIONE DI PUNTI 

Visualizzare un punto è la funzione grafica più elementare. Può anche 
risultare utile colorare vari pixel o parti di video. 

L’utente può far tutto questo con le istruzioni PSET, PRESET e PAINT. 

La funzione POINT consente, invece, di conoscere il numero di colore di 
un pixel specificato. 


PSET (PR0GRAMMA/1MMED1ATQ) 

Attiva con il colore specificato o con il colore di foreground il pixel 
più vicino al punto di coordinate (x,y). 



Sintassi 14-13 Istruzione PSET 
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Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è un' espressione numerica intera, che individua 
e seleziona la finestra, sulla quale PSET deve 
operare. 

E' opzionale; il valore di default è la finestra 
attuale. 

x.y 

sono le coordinate, usate da PSET. Se le 
coordinate x,y individuano un punto,al di fuori 
della finestra, PSET attiverà il pixel (all'in¬ 
terno della finestra), che è più vicino alle 
coordinate assegnate. 

colour 

specifica il numero di colore e quindi il colore 
per attivare il pixel più vicino alle coordinate 
x,y. Se omesso, il colore usato è quello di 
foreground. 


Nota : 11 parametro colour dell'istruzione PSET non fa variare i colori di 
foreground e background della finestra specificata. 


PRESET (PROGRAMMA/IMMEDIATO) 

Attiva con il colore di background della finestra specificata il pixel 
più vicino al punto di coordinate (x,y). 



Sintassi 14-14 Istruzione PRESET 
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Oove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è un'espressione numerica intera che individua e 
seleziona la finestra sulla quale PRESET deve 
operare. Se omesso, il valore di default è la 
finestra attuale 

*.y 


sono le coordinate usate da PRESET. Se x,y 
individuano un punto al di fuori della finestra, 
PRESET attiverà il pixel (all'interno della 
finestra) più vicino alle coordinate assegnate. 


PAINT (PROGRAMMA/1MMED1ATO) 

Colora l'intera finestra o una sua porzione purché delimitata da un 
contorno chiuso. 11 sistema inizia a colorare dal pixel più vicino alle 
coordinate x,y assegnate. 



Sintassi 14-15 Istruzione PAINT 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è un'espressione numerica intera che individua e 
seleziona la finestra sulla quale l'istruzione 
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PAINT deve operare. E' opzionale; il valore di 
default è la finestra attuale. 

x.y 

sono le coordinate del pixel dal quale il 
sistema inizia a colorare 

colour 

è un numero di colore, che specifica come 
colorare la finestra o una sua porzione, 
delimitata da un contorno chiuso. 11 valore di 
default è il colore di foreground 

bcolour 

è un numero di colore, che specifica come 
colorare il bordo della finestra o di una sua 
porzione. Il valore di default è il colore di 
foreground. 


Nota : Per colorare una figura delimitata da un contorno chiuso, l’utente 
si assicuri che le coordinate x e y cadano all'interno della figura. Se 
vengono a trovarsi al di fuori del bordo della figura, il sistema colora 
soltanto la parte di finestra, esterna alla finestra medesima. 


P01NT 

Assegna ad una variabile il numero di colore del pixel, più vicino alle 
coordinate (x,y) specificate all'interno della finestra attuale. 



Sintassi 14-16 Funzione P01NT 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

colour number variable 

è una variabile, alla quale il sistema assegna 
un intero da 0 a 3. Questo intero è il numero di 
colore del pixel più vicino alle coordinate 
(x,y) specificate. 

x,y 

coordinate del pixel di cui si vuole conoscere 
il numero di colore. 


Esempi 

Le istruzioni seguenti sono state eseguite sulla versione in bianco e 
nero dell'M20. 


VIDEO 

COMMENTI 

10 C1RCLE(50,50),20 

traccia un circonferenza sul video con centro 
nel punto di coordinate (50,50) e raggio 20 (per 
la descrizione dell'istruzione CIRCLE, vedere in 
seguito nel capitolo) 

20 PSET(50,50) 

attiva con il colore di foreground il pixel più 
vicino al punto di coordinate (50,50). 

30 A%=P01NT(50,50) 

assegna un valore intero da 0 a 1 (in quanto in 
bianco e nero) alla variabile A%. 

40 PR1NT A% 

visualizza il contenuto di A% 


COME TRACCIARE LINEE, RETTANGOLI, CERCHI ES ELLISSI 

La grafica dell'M20 comprende istruzioni, che permettono all'utente di 
tracciare figure geometriche. 
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LINE (PROGRAMMA/1MMEDIATO) 

Traccia una linea o un rettangolo in un determinato colore. L'utente ha 
la facoltà di colorare la superficie del rettangolo. 



Sintassi 14-17 Istruzione LINE 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale l'istruzione 
LINE deve operare. Se omessa, l'istruzione LINE 
opera sulla finestra attuale. 

STEP 


è una parola chiave opzionale. Consente l'uso di 
coordinate relative. Con l'uso di STEP le 
coordinate (x ,y ) (coordinate iniziali) diven¬ 
gono relative all'ultimo punto tracciato o (in 
assenza di questo) all'angolo inferiore sinistro 
della finestra. Le coordinate (x ,y ) (coordina¬ 
te finali) divengono, invece, relative al punto 
d'inizio della linea (o del rettangolo) 
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V y i 

sono le coordinate del punto iniziale della 
linea. Se omesse, la linea inizia dall'ultimo 
punto tracciato o, in assenza di questo, 
dall'angolo inferiore sinistro della finestra. 

V y 2 

sono le coordinate del punto finale della linea 

colour 

un numero di colore, che individua il colore con 
il quale deve essere tracciata la linea o il 
rettangolo. 11 valore di default è il colore di 
foreground della finestra attuale. 

B (Box) 

è un parametro opzionale, con l'uso del quale è 
possibile tracciare un rettangolo. 11 rettangolo 
(con i lati paralleli ai bordi della finestra) 
ha come diagonale, il segmento di coordinate (x^ 

’V-l ) e (x 2’ y 2 } 

F (Filled) 

è un parametro opzionale, da usare solo con il 
parametro B. ’BF ' traccia un rettangolo, che il 
sistema colora con il colore specificato nel 
parametro colour. 

action verb 

è un parametro opzionale, che può assumere i 
seguenti valori: AND, XOR, OR, NOT, P5ET, PRESET. 

L 1 oozione PSET fa in modo che la linea o il 
rettangolo vengano tracciati nel colore indica¬ 
to. Le opzioni AND OR e XOR indicano che il 
colore con cui tracciare la linea o il rettango¬ 
lo o la sua superficie è il risultato della 
corrispondente operazione logica fra il colore 
indicato e quello già presente su video. Questa 
operazione viene ripetuta per ogni punto della 
linea o del rettangolo. L'opzione NOT indica che 
il colore della linea o del rettangolo è il 
complemento di quello già presente su video. Con 
l'operazione PRESET la linea o il rettangolo 
vengono tracciati con il colore di background 
della finestra selezionata. 11 valore di default 
del parametro action verb è PSET. 
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C1RCLE (PR0GRAMMA/1MMED1AT0) 

Traccia una circonferenza o un'ellisse. 

Le coordinate x,y individuano il centro della circonferenza oppure il 
centro dell'ellisse. 11 parametro "r" individua il raggio della 
circonferenza oppure il semiasse orizzontale dell'ellisse. 



Sintassi 14-18 Istruzione C1RCLE 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale far operare 
l'istruzione C1RCLE. E' opzionale. Se omessa, 
viene selezionata la finestra attuale 

x.y 


sono le coordinate del centro della circonferen¬ 
za o dell'ellisse. 

r 


è il raggio della circonferenza o il semiasse 
orizzontale dell'ellisse. 

colour 


è un numero di colore che individua il colore 
con cui disegnare la circonferenza o l'ellisse. 
11 valore di default è il colore di foreground 
della finestra selezionata. 







axis ratio 

è un numero reale positivo, che definisce il 
rapporto fra gli assi verticale e orizzontale di 
un'ellisse. E' opzionale. 11 valore di default è 
0.85 che dà luogo ad una circonferenza (questo 
perchè la densità dei pixel è maggiore nella 
direzione x che non nella direzione y) 

action verb 

è un parametro opzionale. Può assumere uno dei 
valori seguenti: AND, XOR, OR, NOT, PSET, 
PRESET. 


Ognuna di queste opzioni definisce l'operazione 
da eseguire su ogni punto della curva. 


L'opzione PSET traccia la circonferenza nel 
colore indicato. 


Le operazioni AND, OR e XOR indicano che il 
colore con cui tracciare la circonferenza è il 
risultato della corrispondente operazione logica 
fra il colore indicato e quello già presente su 
video. 


L'operazione NOT indica che il colore della 
circonferenza è il complemento di quello già 
presente su video. Con l'opzione PRESET la 
circonferenza viene tracciata con il colore di 
background della finestra selezionata. 

11 valore di default del parametro action verb è 
PSET. 


Nota. L istruzione C1RCLE, usata senza il parametro "axis ratio", traccia 
sempre una circonferenza, indipendentemente dalla scala adottata sull'as¬ 
se della x e sull'asse delle y. 

Questo perchè il raggio del cerchio viene calcolato sempre lungo l'asse 
delle x. 


ISTRUZIONI SPECIALI 

L utente può memorizzare in una matrice intera unidimensionale il 
contenuto dell'intera finestra o di una sua parte con l’uso dell'istru¬ 
zione GET oppure con l’istruzione PUT può trasferire su video l'immagine 
di una finestra, precedentemente memorizzata in una matrice intera 
unidimensionale. 
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Con l'istruzione DRAW, la penna virtuale può essere spostata in una 
qualsiasi posizione all'interno di una finestra e si possono tracciare 
linee di colore assegnato. 


GET (PROGRAMMA/1MMED1ATO) 

Memorizza l'intera finestra o una sua parte in una matrice intera 
unidimensionale. 



t 


Sintassi 14-19 Istruzione GET 


Dove 


ELEMENTO DI SINTASSI 


' SIGNIFICATO 

window number 
expression 


è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale GET deve 
operare. 11 valore di default è la finestra 
attuale. 

Y y i 

X 2* y 2 


sono le coordinate che definiscono la diagonale 
del rettangolo da memorizzare 

array element 


il primo elemento utilizzabile della matrice 
unidimensionale, usata nell'istruzione GET. 

11 sistema utilizza gli elementi della matrice 
nel modo seguente: 



- il primo elemento contiene la base del 
rettangolo. 









- il secondo contiene l'altezza. 

- il valore del terzo elemento stabilisce se 
l'immagine da memorizzare è in bianco e nero o 
a colori 

Le rimanenti componenti della matrice contengono 
l'informazione sullo stato dei bit delle scanli- 
ne, che formano il rettangolo. Si ricordi che 
ogni elemento della matrice contiene una stringa 
di 16 bit. 


Note 

L'utente deve dimensionare la matrice unidimensionale, usando l'istruzio¬ 
ne DIM. 

La formula seguente calcola il numero utile di elementi di matrice: 

per un video in bianco e nero: # 

altezza (in pixel) x base (in pixel) 

16 

per un video a colori: 

altezza (in pixel) x base (in pixel) 

8 

PUT (PROGRAMMA/IM^EDIATO) 

Visualizza un'immagine, precedentemente memorizzata in una matrice intera 
unidimensionale, con l'uso dell'istruzione GET. 



Sintassi 14-20 Istruzione PUT 
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Dove 


ELEMENTO Di SINTASSI 


SIGNIFICATO 

window number 
expression 


è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale deve operare 
l'istruzione PUT. 

11 valore di default è la finestra attuale. 

X 1’ y l 

V y 2 


sono le coordinate che definiscono la diagonale 
del rettangolo memorizzato nella matrice unidi¬ 
mensionale, rettangolo il cui contenuto deve 
essere portato su video. 

array element 


è il primo elemento della matrice unidimensiona¬ 
le, usata per contenere l'informazione acquisita 
con l'operazione GET. 

action verb 


è un parametro opzionale, che può assumere i 
seguenti valori: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni definisce 
l'operazione corrispondente, da eseguire su ogni 
pixel, contenuto all'interno del rettangolo. 
L'opzione PSET indica che il rettangolo visua¬ 
lizzato è, semplicemente, quello memorizzato 
nella matrice. 

Le operazioni AND,OR e XOR stanno, invece, ad 
indicare che il rettangolo visualizzato è il 
risultato di un'operazione logica fra il conte¬ 
nuto della matrice e il precedente contenuto di 
quell'area rettangolare di video. 

L'opzione NOT indica che del contenuto del video 
ne sarà fatto il complemento. L'opzione PRESET, 
invece, visualizza il complemento del contenuto 
della matrice. 

11 valore di default del parametro action verb è 
PSET. 
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Esempio 


VIDEO 


5 DIM 8%(100) 

10 CLS:C1RCLE(256,128),80 
20 LINE(190,60)-(350,195), , 
30 GET(190,60)-(360,128),8% 
50 CLS:PUT(250,220),B%(0) 


B 

( 0 ) 


COMMENTI 


L'istruzione 5 dimensiona la matrice 
da usare per memorizzare le scanline 
del rettangolo. 

La linea 10 cancella quanto contenuto 
su video e traccia una circonferenza. 

L'istruzione 20 traccia un rettangolo 
sovrapposto al cerchio (vedere la 
figura 14-7). 

L'istruzione 30 memorizza una parte di 
video nella matrice B% (vedere la 
figura 14-8). 

La linea 50 cancella quanto contenuto 
su video e visualizza l'area rettango¬ 
lare precedentemente memorizzata (ve¬ 
dere la figura 14-9). 



Figura 14-7 L'immagine su video, dopo l'esecuzione delle istruzioni 10 e 

20 . 
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Figura 14-9 L'immagine su video, risultante dall'esecuzione dell'istru 
zione 50. 






DRAW (PRQGRAMMA/1MMED1AT0) 


Sposta la penna virtuale all'interno di una finestra e traccia linee di 
un colore specificato. 



Sintassi 14-21 Istruzione DRAW 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un'espressione numerica intera, che individua 
e seleziona la finestra, sulla quale DRAW deve 
operare. 

Il valore di default è la finestra attuale. 


command string 


può essere o una variabile stringa o una 
costante stringa. 

In entrambi i casi, la stringa è formata da uno 
o più comandi (elencati nella tabella Comandi); 
questi comandi controllano il movimento della 
"penna virtuale”. 

Tutti i comandi, ad eccezione del comando C, 
possono essere preceduti dall'opzione B, che 
impedisce di disegnare su video e possono essere 
seguiti da una delle seguenti opzioni: AND, XOR, 
OR, NOT, PSET, PRESET. Ognuna di queste opzioni 
individua la corrispondente operazione, che 
viene eseguita su ciascun punto della linea. 
Queste opzioni vengono specificate con la prima 
lettera del nome; unica eccezione, l'opzione 
PRESET, che viene specificata con la lettera R. 


L'opzione P (cioè PSET) traccia la figura nel 
colore indicato, le opzioni A (cioè AND), 0 
(cioè OR), e X (cioè XOR) indicano che il colore 
della figura è il risultato di un'operazione 
logica fra il colore indicato e il contenuto 
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precedente del video. 

L'opzione N (cioè NOT) indica che il colore 
della figura è il complemento del contenuto del 
video. 

è 

L'opzione R (cioè PRESET) traccia la figura nel 
colore di background. 

11 valore di default è P. 


Nota : 1 parametri dei comandi (dx,dy,x,y e colour) possono essere 

espressi come variabili. In questo caso, i nomi delle variabili devono 
essere scritti in lettere maiuscole e fra segni di uguale. Vedere gli 
esempi qui di seguito. 


Comandi 


COMANDO 


SIGNIFICATO 

M dx,dy 


sposta la penna dalla posizione attuale (diciamo 
a,b) alla posizione, indicata da (a+dx,b+dy). 

J x, y 


sposta la penna nella posizione, indicata da 
(x,y>. 

U dy 


sposta la penna in alto di dy posizioni. 

D dy 


sposta la penna in basso di dy posizioni. 

L dx 


sposta la penna a sinistra di dx posizioni. 

R dx 


sposta la penna a destra di dx posizioni. 

C colour 


stabilisce il colore con cui tracciare linee. 

Dopo l'opzione C deve essere specificato un 
numero di colore. 

Se l'opzione C non viene specificata, viene 
assunto il colore di foreground della finestra 
attuale. . 
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Esempi 


VIDEO 

COMMENTI 

90 PSET(10,20) 

l'istruzione 90 attiva il punto (10,20) con il 

100 X=23 

colore di foreground. 

130 DRAW "M=X=,25" 

L'istruzione 100 pone X=23 


L'istruzione 130 traccia una linea dalla posi¬ 
zione attuale della penna (10,20) alla posizione 
(33,45), cioè (10+23,20+25) 

250 A$="BM 10,2 

l'istruzione 250 assegna alla variabile A$ la 

D 20 MR 15,-3" 

seguente stringa di comandi 

- il comando M con l'opzione B per spostare la 
penna senza disegnare ("pen up") dalla sua 
posizione attuale (diciamo a,b) alla posizione 
(a+10,b+2). 

- il comando D per spostare la penna in basso di 
20 posizioni cioè fino al punto (a+10,b-18) 

- il comando M per spostare la penna dalla sua 

posizione attuale (a+10,b-18) al punto 

(a+25,b-21). 

L'opzione R (PRESET) indica che la linea deve 

essere tracciata nel colore di background. 

260 DRAW A$ 

l'istruzione 260 esegue la sequenza dei comandi, 
specificati nella variabile A$. 


Note 

La sequenza di comandi in una istruzione DRAW può essere impostata sia in 
lettere minuscole che in lettere maiuscole. 1 comandi possono essere 
separati l'uno dall'altro da spazi, ma possono anche essere contigui. 
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PRESTAZIONI GRAFICHE FORNITE DAL PCOS 


I due comandi PCOS label e sprint possono essere richiamati in BASIC con 
le istruzioni CALL o EXEC. 

Con l'uso del comando label, l'utente può visualizzare stringhe di 
caratteri di dimensione e orientamento variabile. 

Con l'uso del comando sprint, l'utente può ottenere una copia su carta 
dell'immagine su video. 

Per maggiori dettagli, sull'uso di questi comandi, vedere il "Profes¬ 
sional Computer Operating System (PCOS) Guida Utente". 


14-41 



15. APPENDICI 



SOLARIO 


A. CODICI ASCII 

B. EQUIVALENZE CARATTERI ASCII 

C. COMANDI BASIC 

D. ISTRUZIONI BASIC 

E. FUNZIONI BASIC 


F. CODICI D'ERRORE E SIGNIFICATO 






APPENDICI 



APPENDICE B EQUIVALENZE DEI CARATTERI IN CODICE ASCII 

La tabella che segue rappresenta le equivalenze nazionali per quei 
caratteri ASCII che appaiono su video o stampante. 


CODICE ASCII 

EQUIVALENTE 

DECIMALE 

ESADECIMALE 

USA 

< 

< 

H 

FRANCIA 

INGHILTERRA 

GERMANIA 

SPAGNA 

PORTOGALLO 

DANIMARCA 

NORVEGIA 

SVEZIA 

FINLANDIA 

35 

23 

® 

£ 

£ 

£ 

# 

£ 

# 

£ 

# 

36 

24 

© 

$ 

$ 

$ 

$ 

$ 

$ 

$ 

n 

64 

40 

® 

§ 

à 

@ 

§ 

§ 

§ 

r 

@ 

91 

5B 

[ 

* 

» 

[ 

X 

i 

À 

E 

X 

92 

5C 

© 

9 

9 

\ 

ò 

N 

? 

0 

0 

93 

5D 

] 

é 

§ 

I 

u 

i 

Ò 

o 

A 

0 

A 

96 

60 

« 

ù 



' 


' 

' 


123 

7B 

{ 

à 

é 

{ 

a 

0 

à 

cS 

a 

124 

7C 

! 

ò 

ù 

1 

d 

n 

9 

i 

0 

125 

7D 

} 

è 

è 

} 

Li 

9 

0 

à 

a 

126 

7E 

— 

ì 


— 

B 

- 

0 



* I 

caratteri compresi 

in un 

cerchio sono 

usati 

per 

funzioni 


in 

linguaggio BASIC. 
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Codice generato della pressione simultanea di un tasto 
qualunque e di CSG5EEU 0 Mitili 

Note: 1. ESC (27 in decimale, 1B in esadecimale) è il risultate dell'uso 
congiunto dei tasti MÉtlWi e BiMilifl. 

2. La funzione Shift-lock è il risultato dell'uso congiunto del 
tasto e del tasto identificato della dicitura LOCK 

nella precedente figura. 
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APPENDICE C 

COMANDI BASIC _ __ 

Pagina 

AUTO 

(IMMEDIATO) 

2-6 

CONT 

(IMMEDIATO) 

13-6 | 

DELETE 

(IMMEDIATO) 

3-2 

EDIT 

(IMMEDIATO) 

3-8 

F1LES 

(PROGRAMMA/IMMEDIATO) 

3-20 

K1LL 

(PROGRAMMA/IMMEDIATO) 

3-16 

LIST 

(IMMEDIATO) 

2-10 

LL1ST 

(IMMEDIATO) 

2-10 

LOAD 

(PROGRAMMA/1MMED1ATO) 

2-27 

MERGE 

(PROGRAMMA/IMMEDIATO) 

3-18 

NANE 

(PROGRAMMA/IMMEDIATO) 

3-15 

NEW 

(PROGRAMMA/IMMEDIATO) 

2-8 

NULL 

(PROGRAMMA/IMMEDIATO) 

7-1 

RENUM 

(IMMEDIATO) 

3-6 

RUN 

(PROGRAMMA/IMMEDIATO) 

2-30 

SAVE 

(PROGRAMMA/IMMEDIATO) 

2-23 

SYSTEM 

(PROGRAMMA/IMMEDIATO) 

10-14 

TRON/TROFF 

(PROGRAMMA/IMMEDIATO) 

13-2 

WIDTH 

(PROGRAMMA/IMMEDIATO) 

7-2 


c-i 
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APPENDICE D 

ISTRUZIONI BASIC 




Pagina 

CALL 

(PROGRAMMA/IMMEDIATO) 

10-10 | 

CHAIN 

(PROGRAMMA) 

11-3 : 

C1RCLE 

(PROGRAMMA/IMMEDIATO) 

14-31 

CLEAR 

(PROGRAMMA/IMMEDIATO) 

5-1 

CLOSE 

(PROGRAMMA/IMMEDIATO) 

12-7 

CLOSE WINDOW 

(PROGRAMMA/IMMEDIATO) 

14-19 

CLS 

(PROGRAMMA/IMMEDIATO) 

14-14 

COLOR 

(PROGRAMMA/IMMEDIATO) 

14-12 ; 

COLOR - GLOBAL COLOUR SET SELECTION (PROGRAMMA/IMMEDIATO) 

14-11 

CURSOR 

(PROGRAMMA/IMMEDIATO) 

14-21 

DATA 

(PROGRAMMA) 

5-5 

DEFDBL 

(PROGRAMMA/IMMEDIATO) 

4-10 

DEF FN 

(PROGRAMMA/IMMEDIATO) 

9-3 

DEF USR 

(PROGRAMMA/IMMEDIATO) 

9-42 j 

DEFINT 

(PROGRAMMA/IMMEDIATO) 

4-10 

DEFSNG 

(PROGRAMMA/IMMEDIATO) 

4-10 

DEFSTR 

(PROGRAMMA/IMMEDIATO) 

4-10 

DIM 

(PROGRAMMA) 

4-18 

DRAW 

(PROGRAMMA/IMMEDIATO) 

14-38 ; 

END 

(PROGRAMMA) 

13-4 

ERASE 

(PROGRAMMA) 

4-22 ; 

ERROR 

(PROGRAMMA/IMMEDIATO) 

13-8 
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EXEC 

.. (PROGRAMMA/IMMEDIATO) _ 

_ . 10-12 

FIELD# 

(PROGRAMMA/IWEDIATO) 

12-28 ! 

J 

FOR 

(PROGRAMMA/IMMEDIATO) 

8-12 

GET 

(PROGRAMMA/IMMEDIATO) 

14-33 

GET# 

(PROGRAMMA/IMMEDIATO) 

12-31 

GOSUB 

(PROGRAMMA) 

10-3 

GOTO 

(PROGRAMMA/IMMEDIATO) 

8-1 

IF.. .GOTO...ELSE 

(PROGRAMMA/IMMEDIATO) 

8-4 

IF...THEN...ELSE 

(PROGRAMMA/IMMEDIATO) 

8-4 

INPUT 

(PROGRAMMA) 

5-10 

INPUT# 

(PROGRAMMA/IMMEDIATO) 

12-10 

LINE 

(PROGRAMMA/IMMEDIATO) 

14-29 

LINE INPUT 

(PROGRAMMA) 

5-14 

LINE INPUT# 

(PROGRAMMA/IMMEDIATO) 

12-13 

LET 

(PROGRAMMA/IMMEDIATO) 

5-3 

LPRINT 

(PROGRAMMA/IMMEDIATO) 

7-4 

LPRINT USING 

(PROGRAMMA/IMMEDIATO) 

7-12 

LSET 

(PROGRAMMA/IMMEDIATO) 

12-36 

NEXT 

(PROGRAMMA/IMMEDIATO) 

8-12 

ON ERROR GOTO 

(PROGRAMMA) 

13-10 

ON...GOSUB 

(PROGRAMMA) 

10-7 

ON...GOTO 

(PROGRAMMA/IMMEDIATO) 

8-3 

OPEN 

(PROGRAMMA/IMMEDIATO) 

12-4 

OPTION BASE 

(PROGRAMMA/IMMEDIATO) 

4-23 
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PAINT 

(PROGRAMMA/IMMEDIATO)_ 

14-26; 

PRESET 

(PROGRAMMA/1MMEDIAT 0) 

, 14-25 

PSET 

(PROGRAMMA/IMMEDIATO) 

14-24 

PRINT 

(PROGRAMMA/IMMEDIATO) 

7-4 

PRINT# 

(PROGRAMMA/IMMEDIATO) 

12-18 

PRINT USING 

(PROGRAMMA/IMMEDIATO) 

7-12 

PRINT # USING 

(PROGRAMMA/IMMEDIATO) 

12-23 

PUT 

(PROGRAMMA/IMMEDIATO) 

14-34 

PUT# 

(PROGRAMMA/IMMEDIATO) 

12-40 

RANDOMIZE 

(PROGRAMMA/IMMEDIATO) 

9-15 

READ 

(PROGRAMMA) 

5-5 

RSET 

(PROGRAMMA/IMMEDIATO) 

12-36 

RE STO RE 

(PROGRAMMA) 

5-5 

RÉSUMÉ 

(PROGRAMMA) 

13-14 

RETURN 

(PROGRAMMA) 

10-3 

SCALE 

(PROGRAMMA/IMMEDIATO) 

14-15 

STOP 

(PROGRAMMA) 

13-4 

SWAP 

(PROGRAMMA/IMMEDIATO) 

5-4 

SYSTEM 

(PROGRAMMA/IMMEDIATO) 

10-14 

WEND 

(PROGRAMMA/IMMEDIATO) 

8-21 

WHILE 

(PROGRAMMA/IMMEDIATO) 

8-21 

WINDOW 

(PROGRAMMA/IMMEDIATO) 

14-10 

WRITE 

(PROGRAMMA/IMMEDIATO) 

7-10 

WRITE# 

(PROGRAMMA/IMMEDIATO) 

12-24 
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APPENDICE E FUNZIONI BASIC 

ABS 

ASC 

ATN 

CDBL 

CHR$ 

CINT 

COS 

CSNG 

CVD 

CV1 

CVS 

EXP 

EOF 

ERL 

ERR 

F1X 

FRE 

HEX$ 

INKEYS 
INPUT $ 

INSTR 

INT 
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9-8 
9-9 
9-37 
9-37 
9-37 
9-10 
9-37 
9-37 
9-37 
9-10 
9-11 
9-21 
9-22 
9-23 
9-24 
9-12 
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LEFT$ 


9-26 


LEN 

9-27 

LOC 

9-37 

LOG 

9-13 

LPOS 

9-38 

MKD$ 

9-39 

MKI$ 

9-39 

MKS$ 

9-39 

MID$ 

9-28 

OCT$ 

9-29 

POINT 

14-27 

POS 

14-23 

RND 

9-14 

SCALEX 

14-18 

SCALEY 

14-18 

SGN 

9-16 

SIN 

9-17 

SPACE$ 

9-31 

SPC 

9-39 

SQR 

9-18 

STRINGS 

9-33 

TAB 

9-40 

TAN 

9-18 

USR 

9-41 
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VAL 

VARPTR 

WINDOW 


9-34 ! .. 
9-44 
14-3 
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APPENDICE F CODICI D'ERRORE E SIGNIFICATO 


CODICI D'ERRORE 


SIGNIFICATO 

0 


Illegal function cali 

1 


NEXT without FOR 

2 


Syntax error 

3 


RETURN without GOSUB 

4 


Out of DATA 

& . ... 5> 

’s " • * 


Illegal function cali 

6 


Overflow 

7 


Out of memory 

8 


Undefined line number 

9 


Subscript out of range 

IO 


Duplicate definition 

11 


Division by zero 

12 


Subscript out of range 

13 


Type mismatch 

14 


Out of string space 

15 


String too long 

16 


String formula too complex 

17 


Can't continue 

18 


Undefined user function 

19 


No RÉSUMÉ 

20 


RÉSUMÉ without error 

21 


Unprintable error 

22 


Missing operand 

23 


Line buffer overflow 

24 


Unprintable error 

25 


Unprintable error 

26 


FOR without NEXT 

27 


Unprintable error 

28 


Unprintable error 

29 


WH1LE without WEND 

30 


WEND without WHILE 

31 


IEEE: Invalid talker/listener address 

32 


IEEE: talker = listener address 

33 


IEEE: Unprintable error 

34 


IEEE: Board not present 

35 


Window not open 

36 


Unable to create window 

37 


Invalid action-verb 

38 


Parameter out of range 

39 


Too many dimensions 

40 


Ok 

41 


Unprintable error 
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42 

Unprintable error 

43 

Unprintable error 

44 

Unprintable error 

45 

Unprintable error 

46 

Unprintable error 

47 

Unprintable error 

48 

Unprintable error 

49 

Unprintable error 

50 

F1ELD overflow 

51 

Internai error 

52 

Bad file number 

53 

File not found 

54 

Bad file mode 

55 

File already open 

56 

Unprintable error 

57 

Disk 1/0 error 

58 

File already exists 

59 

Unprintable error 

60 

Unprintable érror 

61 

Disk full 

62 

Subscript out of range 

63 

Bad record number 

64 

Bad file name 

65 

Unprintable error 

66 

Direct statement in file 

67 

Too many files 

68 

Subscript out of range 

69 

Volume name not found 

70 

Renarne error 

71 

Volume number error 

72 

Volume not enabled 

73 

Invalid Password 

74 

Illegal disk change 

75 

Write protected 

76 

Error in Parameter 

77 

Too many parameters 

78 

File not open 

79 

Unprintable error 

80 

Unprintable error 

81 

Unprintable error 

82 

Unprintable error 

83 

Unprintable error 

84 

Unprintable error 

85 

Unprintable error 

86 

Unprintable error 

---H 
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87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 

109 

110 
111 
112 

113 

114 

115 

116 

117 

118 

119 

120 
121 
122 

123 

124 

125 
1 26 
127 


Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 

Unprintable 


error 

error 


error 

error 

error 

error 

error 

error 

error 


error 

error 

error 

error 

error 

error 

error 


error 

error 

error 

error 

error 

error 

error 

error 

error 

error 

error 

error 

error 

error 

error 


error 


error 
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